|
|
A363921
|
|
A363920 evaluated over the nonprime numbers.
|
|
1
|
|
|
1, 1, 16, 1296, 512, 81, 10000, 2985984, 38416, 50625, 65536, 34012224, 64000000, 194481, 234256, 110075314176, 625, 456976, 19683, 481890304, 19683000000000, 33554432, 1185921, 1336336, 1500625, 2821109907456, 2085136, 2313441, 6553600000000, 406671383849472
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
MAPLE
|
seq(A363920(n), n in remove(isprime, [$0..42]));
|
|
MATHEMATICA
|
{1}~Join~Map[#^(PrimeOmega[#]*PrimeNu[#]) &, Select[Range[42], Not@*PrimeQ]] (* Michael De Vlieger, Jul 27 2023 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|