|
|
A258603
|
|
Smallest number m such that A069493(m) = prime(n)^6.
|
|
8
|
|
|
2, 6, 13, 22, 45, 58, 87, 102, 135, 181, 198, 249, 281, 298, 331, 379, 430, 444, 488, 525, 539, 584, 620, 663, 720, 755, 767, 794, 810, 847, 944, 969, 1014, 1028, 1099, 1111, 1154, 1196, 1225, 1267, 1306, 1317, 1384, 1399, 1427, 1433, 1516, 1596, 1620, 1633
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
A069493(m) mod prime(n) > 0 for m < a(n);
also smallest number m such that A258571(m) = prime(n):
|
|
LINKS
|
|
|
EXAMPLE
|
. ----+----+-------+---------------------------------
. 1 | 2 | 2 | 64
. 2 | 3 | 6 | 729
. 3 | 5 | 13 | 15625
. 4 | 7 | 22 | 117649
. 5 | 11 | 45 | 1771561
. 6 | 13 | 58 | 4826809
. 7 | 17 | 87 | 24137569
. 8 | 19 | 102 | 47045881
. 9 | 23 | 135 | 148035889
. 10 | 29 | 181 | 594823321
. 11 | 31 | 198 | 887503681
. 12 | 37 | 249 | 2565726409
. 13 | 41 | 281 | 4750104241
. 14 | 43 | 298 | 6321363049
. 15 | 47 | 331 | 10779215329
. 16 | 53 | 379 | 22164361129
. 17 | 59 | 430 | 42180533641
. 18 | 61 | 444 | 51520374361
. 19 | 67 | 488 | 90458382169
. 20 | 71 | 525 | 128100283921
. 21 | 73 | 539 | 151334226289
. 22 | 79 | 584 | 243087455521
. 23 | 83 | 620 | 326940373369
. 24 | 89 | 663 | 496981290961
. 25 | 97 | 720 | 832972004929 .
|
|
PROG
|
(Haskell)
import Data.List (elemIndex); import Data.Maybe (fromJust)
a258603 = (+ 1) . fromJust . (`elemIndex` a258571_list) . a000040
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|