A083256 - OEIS

A083256

a(n) = A046523(n-th nonprime number) = A046523(A018252(n)).

1, 4, 6, 8, 4, 6, 12, 6, 6, 16, 12, 12, 6, 6, 24, 4, 6, 8, 12, 30, 32, 6, 6, 6, 36, 6, 6, 24, 30, 12, 12, 6, 48, 4, 12, 6, 12, 24, 6, 24, 6, 6, 60, 6, 12, 64, 6, 30, 12, 6, 30, 72, 6, 12, 12, 6, 30, 48, 16, 6, 60, 6, 6, 6, 24, 60, 6, 12, 6, 6, 6, 96, 12, 12, 36, 30, 24, 30, 6, 72, 30, 6, 48

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

Amiram Eldar, Table of n, a(n) for n = 1..10000

MATHEMATICA

f[n_] := Module[{e = ReverseSort[FactorInteger[n][[;; , 2]]]}, Times @@ (Prime[Range[Length[e]]]^e)]; f[1] = 1; f /@ Select[Range[120], !PrimeQ[#] &] (* Amiram Eldar, Feb 22 2025 *)

CROSSREFS

Cf. A007395, A000040, A002808, A018252, A046523, A071364, A083257.

Sequence in context: A021685 A071851 A389667 * A083257 A286366 A331059

Adjacent sequences: A083253 A083254 A083255 * A083257 A083258 A083259

KEYWORD

nonn

AUTHOR

Labos Elemer, May 09 2003

EXTENSIONS

Corrected by Ray Chandler, Aug 01 2004

STATUS

approved