|
Search: id:A075243
|
|
|
| A075243 |
|
Composite numbers requiring increasingly larger bases to become prime by base reversal. |
|
+0
2
|
|
| 4, 6, 8, 9, 16, 27, 36, 78, 81, 102, 114, 144, 270, 420, 480, 750, 1848, 2382, 2940, 13860, 14490, 14520, 21840, 31860, 33660, 44580, 80850, 1228080, 4305210, 5326860, 6846840
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
The bases at which these entries occur are in A074901. See A075242.
|
|
MATHEMATICA
|
NextComposite[n_] := Block[{k = n + 1}, While[PrimeQ[k], k++ ]; k]; f[n_] := Block[{b = 2}, While[b < n && !PrimeQ[ FromDigits[ Reverse[ IntegerDigits[n, b]], b]], b++ ]; b]; If[b != n, b, 0]]; b = -1; k = 4; Do[ While[c = f[k]; c <= b, k = NextComposite[k]]; b = c; Print[k], {n, 1, 31}]
|
|
CROSSREFS
|
Sequence in context: A095404 A073540 A123710 this_sequence A024370 A121719 A032350
Adjacent sequences: A075240 A075241 A075242 this_sequence A075244 A075245 A075246
|
|
KEYWORD
|
base,hard,nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 09 2002
|
|
|
Search completed in 0.002 seconds
|
