[go: up one dir, main page]

login
A370494
Oblong numbers of the form (k-1)*k where k is the product of an odd number of distinct primes.
2
2, 6, 20, 42, 110, 156, 272, 342, 506, 812, 870, 930, 1332, 1640, 1722, 1806, 2162, 2756, 3422, 3660, 4290, 4422, 4830, 4970, 5256, 6006, 6162, 6806, 7832, 9312, 10100, 10302, 10506, 10920, 11342, 11772, 11990, 12656, 12882, 16002, 16770, 17030, 18632, 18906, 19182
OFFSET
1,1
LINKS
FORMULA
a(n) = A002378(A030059(n)-1).
Sum_{n>=1} 1/a(n) = (A368250 + A033150 - 1)/2 = 0.776922504035... .
MATHEMATICA
Table[n*(n - 1), {n, Select[Range[150], MoebiusMu[#] == -1 &]}]
PROG
(PARI) lista(kmax) = forsquarefree(k=1, kmax, if(moebius(k) == -1, print1(k[1]*(k[1]-1), ", ")));
CROSSREFS
Complement of A370495 within A368249.
Sequence in context: A323724 A214307 A087134 * A036689 A355390 A226326
KEYWORD
nonn,easy
AUTHOR
Amiram Eldar, Feb 20 2024
STATUS
approved