A333778 Fixed points of A333776.
0, 1, 2, 3, 4, 7, 8, 10, 15, 16, 29, 31, 32, 36, 42, 57, 63, 64, 86, 113, 127, 128, 136, 170, 225, 251, 255, 256, 292, 338, 449, 477, 499, 511, 512, 528, 588, 674, 682, 897, 949, 995, 1023, 1024, 1172, 1346, 1390, 1793, 1849, 1893, 1987, 2039, 2047, 2048, 2080
Offset: 1
Programs
-
PARI
is(n, base=2) = { my (d=digits(n, base), t=[]); forstep (k=#d, 1, -1, if (d[k], t=Vecrev(t);); t=concat(d[k], t)); n==fromdigits(t, base) }
Comments