Search: a128349 -id:a128349
|
|
A128338
|
|
Numbers k such that (8^k + 5^k)/13 is prime.
|
|
+0
17
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are primes.
|
|
LINKS
|
|
|
MATHEMATICA
|
k=8; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n, 1, 100}]
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128339, A128340, A128341, A128342, A128343. Cf. A004061, A082182, A121877, A059802. Cf. A062572, A128344, A128345, A128346, A128347, A128348, A128349, A128350, A128351, A128352, A128353, A128354.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|
|
A128342
|
|
Numbers k such that (13^k + 5^k)/18 is prime.
|
|
+0
23
|
|
|
13, 19, 31, 359, 487, 757, 761, 1667, 2551, 3167, 6829
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are primes.
|
|
LINKS
|
|
|
MATHEMATICA
|
k=13; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n, 1, 100}]
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128338, A128339, A128340, A128341, A128343. Cf. A004061, A082182, A121877, A059802. Cf. A062572, A128344, A128345, A128346, A128347, A128348, A128349, A128350, A128351, A128352, A128353, A128354.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|
|
A128347
|
|
Numbers k such that (11^k - 5^k)/6 is prime.
|
|
+0
26
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are primes.
|
|
LINKS
|
|
|
MATHEMATICA
|
k=11; Do[p=Prime[n]; f=(k^p-5^p)/(k-5); If[ PrimeQ[f], Print[p] ], {n, 1, 100}]
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A062572, A128344, A128345, A128346, A128348, A128349, A128350, A128351, A128352, A128353, A128354. Cf. A004061, A082182, A121877, A059802. Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128338, A128339, A128340, A128341, A128342.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|
|
A128350
|
|
Numbers k such that (14^k - 5^k)/9 is prime.
|
|
+0
18
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are primes.
|
|
LINKS
|
|
|
MATHEMATICA
|
k=14; Do[p=Prime[n]; f=(k^p-5^p)/(k-5); If[ PrimeQ[f], Print[p] ], {n, 1, 200}]
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A062572, A128344, A128345, A128346, A128347, A128348, A128349, A128351, A128352, A128353, A128354. Cf. A004061, A082182, A121877, A059802. Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128338, A128339, A128340, A128341, A128342.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
One more term from Herman Jamke (hermanjamke(AT)fastmail.fm), May 01 2008
|
|
STATUS
|
approved
|
|
|
|
|
A128336
|
|
Numbers k such that (6^k + 5^k)/11 is prime.
|
|
+0
26
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are primes.
No other terms less than 100000. - Robert Price, May 11 2012
|
|
LINKS
|
|
|
MATHEMATICA
|
k=6; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n, 1, 100}]
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A057171, A082387, A122853, A128335, A128337, A128338, A128339, A128340, A128341, A128342, A128343, A004061, A082182, A121877, A059802, A062572, A128344, A128345, A128346, A128347, A128348, A128349, A128350, A128351, A128352, A128353, A128354.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
One more term (8783) added (unknown discoverer) corresponding to a probable prime with 6834 digits by Jean-Louis Charton, Oct 06 2010
|
|
STATUS
|
approved
|
|
|
|
|
A128337
|
|
Numbers k such that (7^k + 5^k)/12 is prime.
|
|
+0
19
|
|
|
11, 31, 173, 271, 547, 1823, 2111, 5519, 7793, 22963, 41077, 49739
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are primes.
|
|
LINKS
|
|
|
MATHEMATICA
|
k=7; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n, 1, 100}]
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A057171, A082387, A122853, A128335, A128336, A128338, A128339, A128340, A128341, A128342, A128343.
Cf. A062572, A128344, A128345, A128346, A128347, A128348, A128349, A128350, A128351, A128352, A128353, A128354.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|
|
A128340
|
|
Numbers k such that (11^k + 5^k)/16 is prime.
|
|
+0
20
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are primes.
|
|
LINKS
|
|
|
MATHEMATICA
|
k=11; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n, 1, 100}]
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128338, A128339, A128341, A128342, A128343.
Cf. A062572, A128344, A128345, A128346, A128347, A128348, A128349, A128350, A128351, A128352, A128353, A128354.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|
|
A128341
|
|
Numbers k such that (12^k + 5^k)/17 is prime.
|
|
+0
22
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are primes.
|
|
LINKS
|
|
|
MATHEMATICA
|
k=12; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n, 1, 100}]
Select[Range[1100], PrimeQ[(12^#+5^#)/17]&] (* Harvey P. Dale, Jul 24 2012 *)
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128338, A128339, A128340, A128342, A128343.
Cf. A062572, A128344, A128345, A128346, A128347, A128348, A128349, A128350, A128351, A128352, A128353, A128354.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|
|
A128343
|
|
Numbers k such that (14^k + 5^k)/19 is prime.
|
|
+0
11
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are primes.
|
|
LINKS
|
|
|
MATHEMATICA
|
k=14; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n, 1, 100}]
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128338, A128339, A128340, A128341, A128342.
Cf. A062572, A128344, A128345, A128346, A128347, A128348, A128349, A128350, A128351, A128352, A128353, A128354.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|
|
A128348
|
|
Numbers k such that (12^k - 5^k)/7 is prime.
|
|
+0
20
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are primes.
Primality of the primes formed by a(8) and a(9) were certified by Primo. - Ray G. Opao, Jul 01 2012
|
|
LINKS
|
|
|
MATHEMATICA
|
k=12; Do[p=Prime[n]; f=(k^p-5^p)/(k-5); If[ PrimeQ[f], Print[p] ], {n, 1, 100}]
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A062572, A128344, A128345, A128346, A128347, A128349, A128350, A128351, A128352, A128353, A128354.
Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128338, A128339, A128340, A128341, A128342.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
Search completed in 0.058 seconds
|