# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a081102 Showing 1-1 of 1 %I A081102 #6 Jan 27 2021 05:34:58 %S A081102 1,64,1126,1653,13680,27453 %N A081102 Numbers k such that the first k digits of log_10(2) after the decimal point are primes. %e A081102 1 is listed because 3 is prime but 5 is not listed because 30102 is not prime. %t A081102 Do[ If[ PrimeQ[ FromDigits[ RealDigits[ N[ Log[10, 2], n + 10], 10, n] [ [1] ] ] ], Print[n] ], {n, 1, 10000} ] %Y A081102 Cf. A007524. %K A081102 nonn,base,more %O A081102 1,2 %A A081102 John Sillcox (JMS21187(AT)aol.com), Apr 15 2003 %E A081102 Offset corrected and a(5)-a(6) added by _Amiram Eldar_, Jan 27 2021 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE