|
|
A122183
|
|
Primes p_i by index i for which the period length of 1/p_i is a semiprime.
|
|
1
|
|
|
4, 6, 9, 11, 14, 15, 17, 19, 20, 26, 27, 34, 39, 41, 43, 56, 59, 61, 62, 64, 76, 83, 85, 86, 96, 101, 102, 109, 111, 112, 119, 124, 138, 140, 144, 147, 149, 150, 154, 161, 166, 168, 170, 171, 175, 192, 198, 203, 216, 219, 222, 224, 225, 235, 236, 239, 240, 246, 251
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
a(1) = 4 because A002371(4) Period of decimal expansion of 1/(4th prime) = 6 = 2*3, a semiprime.
a(2) = 6 because A002371(6) = 6 = 2*3.
a(3) = 9 because A002371(9) = 22 = 2*11.
a(4) = 11 because A002371(11) = 15 = 3*5.
a(5) = 14 because A002371(14) = 21 = 3*7.
a(6) = 15 because A002371(15) = 46 = 2*23.
a(7) = 17 because A002371(17) = 58 = 2*29.
|
|
MATHEMATICA
|
semiprimeQ[n_] := Plus @@ Last /@ FactorInteger[n] == 2; PrimePi /@ Select[Prime@ Range@ 254, semiprimeQ@ MultiplicativeOrder[10, # ] &] (* Robert G. Wilson v *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|