OFFSET
1,1
LINKS
PROG
(PARI)
\\ Use this one for writing b-files:
A327973write(up_to) = { my(s=1, t, n=0); for(n=1, up_to, t = A269160(s); write("b327973.txt", n, " ", bitxor(2*s, t)); s = t); };
(Python)
def A269160(n): return(n^((n<<1)|(n<<2)))
def genA327973():
'''Yield successive terms of A327973.'''
s = 1
while True:
t = A269160(s)
yield (t^(s<<1))
s = t
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Oct 03 2019
STATUS
approved