# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a249899 Showing 1-1 of 1 %I A249899 #21 Sep 08 2022 08:46:10 %S A249899 1,69,211,258,270,276,433,609,639,787,877,1021,1201,1231,1255,1291, %T A249899 1321,1433,1621,1721,1787,1877,2011,2111,2131,2141,2161,2204,2311, %U A249899 2391,2411,2556,2676,2711,2931,3121,3343,3409,3413,3433,3463,3554,3643,3678,3679,3877 %N A249899 Numbers k such that sigma(k) contains the same digits as k in base 10. %C A249899 Supersequence of A115920 and A069216. %H A249899 Harvey P. Dale, Table of n, a(n) for n = 1..1000 %e A249899 211 is in the sequence because the set of digits of n {1, 2} equals the set of digits of sigma(211) = 212. %t A249899 Select[Range[4000],Union[IntegerDigits[DivisorSigma[1,#]]] == Union[ IntegerDigits[#]]&] (* _Harvey P. Dale_, Dec 29 2015 *) %o A249899 (Magma) [n: n in [1..10^5] | Set(Intseq(n)) eq Set(Intseq(SumOfDivisors(n)))]; %o A249899 (PARI) isok(n) = Set(digits(n)) == Set(digits(sigma(n))); \\ _Michel Marcus_, May 27 2018 %Y A249899 Cf. A000203, A069216, A115920. %K A249899 nonn,base %O A249899 1,2 %A A249899 _Jaroslav Krizek_, Jan 05 2015 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE