login
A094226
Erroneous version of A000040.
0
4, 6, 11, 13, 17, 19, 23, 28, 30, 36, 41, 43, 46, 53, 59, 61, 67, 71, 72, 79, 83, 88, 97, 101, 103, 106, 108, 113, 127, 130, 137, 138, 149, 151, 156, 163, 167, 173, 178, 181, 191, 193, 197, 198, 211, 223, 227, 229, 232, 239, 240, 250, 257, 262, 268, 271, 276, 280
OFFSET
3,1
COMMENTS
Original definition: Let s=(log(prime(n))-log(n))/log(n-1), then a(n) = floor(n*(n-1)^s).
MATHEMATICA
fa[n_]=(Log[Prime[n]]-Log[n])/Log[n-1]
Table[Floor[N[n*(n-1)^fa[n]]], {n, 3, 200}]
CROSSREFS
Sequence in context: A185868 A250125 A190489 * A047288 A287565 A163417
KEYWORD
nonn,dead
AUTHOR
Roger L. Bagula, May 28 2004
STATUS
approved