Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A053232
Numbers n for which values not equal to 2 occur in the expansion of A053230.
7
1, 2, 23, 31, 32, 38, 39, 54, 59, 67, 68, 74, 75, 84, 98, 99, 114, 128, 129, 138, 149, 157, 158, 172, 177, 197, 198, 201, 202, 228, 229, 232, 240, 241, 247, 248, 257, 262, 263, 277, 278, 281, 283, 284, 293, 307, 308, 311, 313, 314, 332, 333, 339, 340, 349, 350
OFFSET
1,2
MAPLE
with(numtheory): f := [seq( `if`((sigma(i+1) > sigma(i)), i, print( )), i=1..5000)];
seq( `if`(f[i+1] - f[i] <> 2, i, print( )), i=1..100);
KEYWORD
nonn
AUTHOR
Asher Auel, Jan 10 2000
STATUS
approved