|
| |
|
|
A038841
|
|
Concatenation of prime factors of n is a cube.
|
|
0
| |
|
|
14, 129, 203, 394, 403, 7654, 12977, 14055, 19582, 46595, 48230, 53962, 62545, 84139, 84769, 95655, 100094, 192364, 211841, 250630, 267051, 279385, 449377, 549601, 655945, 705274, 713530, 827359, 841033, 879203, 1130825, 1179435, 1236865
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Arguably, 1 should be included in this sequence.
|
|
|
EXAMPLE
| 62545=5*7*1787 and 571787=83^3.
|
|
|
PROG
| (PARI) catpf(n)=my(f=factor(n), s=""); for(i=1, #f[, 1], for(j=1, f[i, 2], s=Str(s, f[i, 1]))); eval(s)
for(n=2, 1e7, if(ispower(catpf(n), 3), print1(n", ")))
|
|
|
CROSSREFS
| Sequence in context: A026882 A173408 A166794 * A021354 A006565 A206207
Adjacent sequences: A038838 A038839 A038840 * A038842 A038843 A038844
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Jeff Burch (gburch(AT)erols.com)
|
|
|
EXTENSIONS
| Corrected and extended; also program from Charles R Greathouse IV (charles.greathouse(AT)case.edu), Apr 28 2010
|
| |
|
|
