|
| |
|
|
A107899
|
|
Numbers n such that sum of terms of continued fraction for prime(n)/n is prime.
|
|
5
| |
|
|
1, 2, 4, 5, 7, 8, 13, 14, 16, 17, 20, 22, 23, 24, 31, 32, 37, 41, 44, 47, 49, 50, 63, 68, 69, 71, 73, 78, 81, 82, 84, 86, 89, 93, 98, 101, 109, 111, 119, 121, 126, 130, 131, 132, 135, 138, 142, 143, 145, 150, 164, 169, 175, 176, 189, 190, 197, 201, 202, 205, 211, 214
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Indices of primes occurring in A107900.
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Continued Fraction.
|
|
|
EXAMPLE
| 17 is OK because 17th prime is 59, 59/17 = 3 +1/(2+1/8), terms of continued fraction is {3, 2, 8) and sum of terms is prime number 13.
|
|
|
MATHEMATICA
| s={}; Do[If[PrimeQ[Plus@@ContinuedFraction[Prime[n]/n]], s=Append[s, n]], {n, 300}]; A107899=s
|
|
|
CROSSREFS
| Cf. A107898, A107899, A107901.
Sequence in context: A191174 A176193 A072920 * A032924 A005125 A082672
Adjacent sequences: A107896 A107897 A107898 * A107900 A107901 A107902
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), May 26 2005
|
| |
|
|
