OFFSET
1,2
COMMENTS
This is the underlying sequence for sequence A256393.
PROG
(PARI) a(n) = if (n==1, 1, my(f = factor(n)); if (n % 2, n + f[1, 1], n + f[#f~, 1]));
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Marcus, Aug 26 2016
STATUS
approved