The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A346244

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A346244

a(n) = n - A342001(n).
(history; published version)

#4 by Susanna Cuyler at Mon Jul 19 18:30:38 EDT 2021

STATUS

proposed

approved

#3 by Antti Karttunen at Mon Jul 19 15:39:39 EDT 2021

STATUS

editing

proposed

#2 by Antti Karttunen at Mon Jul 19 03:56:41 EDT 2021

NAME

allocated for Antti Karttunen

a(n) = n - A342001(n).

DATA

1, 1, 2, 2, 4, 1, 6, 5, 7, 3, 10, 4, 12, 5, 7, 12, 16, 11, 18, 8, 11, 9, 22, 13, 23, 11, 24, 12, 28, -1, 30, 27, 19, 15, 23, 26, 36, 17, 23, 23, 40, 1, 42, 20, 32, 21, 46, 34, 47, 41, 31, 24, 52, 45, 39, 33, 35, 27, 58, 14, 60, 29, 46, 58, 47, 5, 66, 32, 43, 11, 70, 59, 72, 35, 64, 36, 59, 7, 78, 58, 77, 39, 82, 22, 63, 41

OFFSET

1,3

FORMULA

a(n) = n - A342001(n) = n - (A003415(n) / A003557(n)).

PROG

(PARI)

A003415(n) = if(n<=1, 0, my(f=factor(n)); n*sum(i=1, #f~, f[i, 2]/f[i, 1]));

A003557(n) = (n/factorback(factorint(n)[, 1]));

A342001(n) = (A003415(n) / A003557(n));

A346244(n) = (n - A342001(n));

CROSSREFS

Cf. A003415, A003557, A342001, A346245 (positions of negative terms).

KEYWORD

allocated

sign

AUTHOR

Antti Karttunen, Jul 19 2021

STATUS

approved

editing

#1 by Antti Karttunen at Sun Jul 11 16:57:08 EDT 2021

NAME

allocated for Antti Karttunen

KEYWORD

allocated

STATUS

approved