|
|
A070762
|
|
n for which floor((4/3)^n) is prime.
|
|
6
|
|
|
3, 4, 6, 7, 9, 10, 11, 12, 38, 42, 59, 96, 154, 171, 211, 313, 465, 563, 1040, 1176, 1213, 1431, 1519, 1987, 2527, 3033, 4039, 4209, 4358, 5109, 5251, 6642, 19200, 25275, 42589, 43025, 49294, 58585, 66290, 77458, 80409, 86533, 94192, 110452, 115166, 124470
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
REFERENCES
|
R. K. Guy, Unsolved Problems in Number Theory, E19.
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[ If[ PrimeQ[ Floor[(4/3)^n]], Print[n]], {n, 1, 17500}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|