A183176
Numbers k such that (10^(2k+1) + 12*10^k - 1)/3 is prime.
Original entry on oeis.org
1, 3, 7, 11, 13, 17, 29, 31, 33, 77, 933, 1555, 11758, 117707
Offset: 1
- C. Caldwell and H. Dubner, "Journal of Recreational Mathematics", Volume 28, No. 1, 1996-97, pp. 1-9.
-
Do[If[PrimeQ[(10^(2n + 1) + 12*10^n - 1)/3], Print[n]], {n, 3000}]
-
is(n)=ispseudoprime((10^(2*n+1)+12*10^n-1)/3) \\ Charles R Greathouse IV, Jun 13 2017
A332137
a(n) = (10^(2n+1)-1)/3 + 4*10^n.
Original entry on oeis.org
7, 373, 33733, 3337333, 333373333, 33333733333, 3333337333333, 333333373333333, 33333333733333333, 3333333337333333333, 333333333373333333333, 33333333333733333333333, 3333333333337333333333333, 333333333333373333333333333, 33333333333333733333333333333, 3333333333333337333333333333333
Offset: 0
- Brady Haran and Simon Pampena, Glitch Primes and Cyclops Numbers, Numberphile video (2015).
- Patrick De Geest, Palindromic Wing Primes: (3)7(3), updated: June 25, 2017.
- Makoto Kamada, Factorization of 33...33733...33, updated Dec 11 2018.
- Index entries for linear recurrences with constant coefficients, signature (111,-1110,1000).
Cf.
A138148 (cyclops numbers with binary digits),
A002113 (palindromes).
Cf.
A332127 ..
A332197 (variants with different repeated digit 2, ..., 9).
Cf.
A332130 ..
A332139 (variants with different middle digit 0, ..., 9).
-
A332137 := n -> (10^(2*n+1)-1)/3+4*10^n;
-
Array[ (10^(2 # + 1)-1)/3 + 4*10^# &, 15, 0]
-
apply( {A332137(n)=10^(n*2+1)\3+4*10^n}, [0..15])
-
def A332137(n): return 10**(n*2+1)//3+4*10**n
Showing 1-2 of 2 results.
Comments