login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A309346
Sums of two refactorable numbers.
1
2, 3, 4, 9, 10, 11, 13, 14, 16, 17, 18, 19, 20, 21, 24, 25, 26, 27, 30, 32, 33, 36, 37, 38, 41, 42, 44, 45, 48, 49, 52, 54, 57, 58, 60, 61, 62, 64, 65, 68, 69, 72, 73, 74, 76, 78, 80, 81, 82, 84, 85, 86, 88, 89, 90, 92, 93, 96, 97, 98, 100, 102, 104, 105
OFFSET
1,1
LINKS
Eric Weisstein's World of Mathematics, Refactorable Number
EXAMPLE
3 is in the sequence since 3 = 1 + 2 and both 1 and 2 are refactorable (since d(1) = 1 | 1 and d(2) = 2 | 2).
4 is in the sequence since 4 = 2 + 2 and 2 is refactorable (since d(2) | 2).
MATHEMATICA
Flatten[Table[If[Sum[ (1 - Ceiling[i/DivisorSigma[0, i]] + Floor[i/DivisorSigma[0, i]]) (1 - Ceiling[(n - i)/DivisorSigma[0, n - i]] + Floor[(n - i)/DivisorSigma[0, n - i]]), {i, Floor[n/2]}] > 0, n, {}], {n, 100}]]
CROSSREFS
Cf. A033950.
Sequence in context: A081870 A165315 A284681 * A047339 A250483 A294485
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Jul 24 2019
STATUS
approved