A002280
a(n) = 6*(10^n - 1)/9.
Original entry on oeis.org
0, 6, 66, 666, 6666, 66666, 666666, 6666666, 66666666, 666666666, 6666666666, 66666666666, 666666666666, 6666666666666, 66666666666666, 666666666666666, 6666666666666666, 66666666666666666, 666666666666666666, 6666666666666666666, 66666666666666666666, 666666666666666666666
Offset: 0
Cf.
A002275,
A002276,
A002277,
A002278,
A002279,
A002281,
A002282,
A002283,
A075415,
A178631,
A178633.
A073551
Number of Fibonacci numbers F(k), k <= 10^n, which end in 3.
Original entry on oeis.org
2, 12, 132, 1332, 13332, 133332, 1333332, 13333332, 133333332, 1333333332, 13333333332, 133333333332, 1333333333332, 13333333333332, 133333333333332, 1333333333333332, 13333333333333332, 133333333333333332, 1333333333333333332, 13333333333333333332, 133333333333333333332, 1333333333333333333332, 13333333333333333333332
Offset: 1
a(2) = 12 because there are 12 Fibonacci numbers up to 10^2 which end in 3.
- Jason Earls, "Palindions," Mathematical Bliss, Pleroma Publications, 2009, pages 115-120. ASIN: B002ACVZ6O.
-
LinearRecurrence[{11, -10}, {2, 12, 132}, 25] (* Paolo Xausa, Aug 27 2025 *)
A073505
Number of primes == 1 (mod 10) less than 10^n.
Original entry on oeis.org
0, 5, 40, 306, 2387, 19617, 166104, 1440298, 12711386, 113761519, 1029517130, 9401960980, 86516370000
Offset: 1
a(2) = 5 because there are 5 primes == 1 (mod 10) less than 10^2. They are 11, 31, 41, 61 and 71.
Cf.
A006880,
A087630,
A073506,
A073507,
A073508,
A073509,
A073510,
A073511,
A073512,
A073513,
A073514,
A073515,
A073516,
A073517.
-
c = 0; k = 1; Do[While[k < 10^n, If[PrimeQ[k], c++ ]; k += 10]; Print[c], {n, 1, 10}]
A073506
Number of primes == 3 (mod 10) less than 10^n.
Original entry on oeis.org
1, 7, 42, 310, 2402, 19665, 166230, 1440474, 12712499, 113765625, 1029509448, 9401979904, 86516427946
Offset: 1
a(2)=7 because there are 7 primes == 3 (mod 10) less than 10^2. They are 3, 13, 23, 43, 53, 73 and 83.
Cf.
A006880,
A087631,
A073505,
A073507,
A073508,
A073509,
A073510,
A073511,
A073512,
A073513,
A073514,
A073515,
A073516,
A073517.
-
c = 0; k = 3; Do[While[k < 10^n, If[PrimeQ[k], c++ ]; k += 10]; Print[c], {n, 1, 10}]
A073507
Number of primes == 7 (mod 10) less than 10^n.
Original entry on oeis.org
1, 6, 46, 308, 2411, 19621, 166211, 1440495, 12712314, 113764039, 1029518337, 9401997000, 86516367790
Offset: 1
a(2)=6 because there are 6 primes == 7 (mod 10) less than 10^2. They are 7, 17, 37, 47, 67 and 97.
Cf.
A006880,
A087632,
A073505,
A073506,
A073508,
A073509,
A073510,
A073511,
A073512,
A073513,
A073514,
A073515,
A073516,
A073517.
-
c = 0; k = 7; Do[While[k < 10^n, If[PrimeQ[k], c++ ]; k += 10]; Print[c], {n, 1, 10}]
A073508
Number of primes == 9 (mod 10) less than 10^n.
Original entry on oeis.org
0, 5, 38, 303, 2390, 19593, 166032, 1440186, 12711333, 113761326, 1029509896, 9401974132, 86516371101
Offset: 1
a(2) = 5 because there are 5 primes == 9 (mod 10) less than 10^2. They are 19, 29, 59, 79 and 89.
Cf.
A006880,
A087633,
A073505,
A073506,
A073507,
A073509,
A073510,
A073511,
A073512,
A073513,
A073514,
A073515,
A073516,
A073517.
-
c = 0; k = 9; Do[While[k < 10^n, If[PrimeQ[k], c++ ]; k += 10]; Print[c], {n, 1, 10}]
A073554
Number of Fibonacci numbers F(k), k <= 10^n, which end in 7.
Original entry on oeis.org
0, 14, 134, 1334, 13334, 133334, 1333334, 13333334, 133333334, 1333333334, 13333333334, 133333333334, 1333333333334, 13333333333334, 133333333333334, 1333333333333334, 13333333333333334, 133333333333333334, 1333333333333333334, 13333333333333333334, 133333333333333333334, 1333333333333333333334, 13333333333333333333334
Offset: 1
a(2) = 14 because there are 14 Fibonacci numbers up to 10^2 which end in 7.
-
Join[{0},Table[10 FromDigits[PadRight[{1},n,3]]+4,{n,30}]] (* Harvey P. Dale, Mar 29 2023 *)
Showing 1-7 of 7 results.
Comments