A253898 Complement of A253897.

1, 2, 7, 11, 13, 17, 19, 23, 25, 26, 27, 29, 31, 32, 34, 37, 38, 41, 42, 43, 46, 47, 49, 51, 52, 53, 54, 57, 58, 59, 61, 62, 64, 65, 67, 68, 69, 71, 73, 74, 76, 79, 81, 82, 83, 85, 86, 87, 89, 92, 93, 94, 95, 96, 97, 98, 100, 101, 103, 106, 107, 109, 110, 111, 113, 114, 115, 116, 118, 119

Offset

1,2

Comments

Numbers n such that the sequence A127644 with a(1) = n does not give a permutation of the natural numbers. See A127644 for more information.

Links

Table of n, a(n) for n=1..70.

Prog

(PARI) b(r)=v=[r]; n=1; while(n<100, p=prod(i=1, #v, v[i]); if(p*n\(vecsum(v)+n)==p*n/(vecsum(v)+n)&&!vecsearch(vecsort(v), n), v=concat(v, n); n=0); n++); #v
r=1; while(r<100, if(b(r)<50, print1(r, ", ")); r++)

Crossrefs

Cf. A127644, A253897.

Sequence in context: A063976 A064000 A069180 * A173135 A020627 A043292

Adjacent sequences: A253895 A253896 A253897 * A253899 A253900 A253901

Keyword

nonn

Author

Derek Orr, Jan 17 2015

Status

approved