OFFSET
1,1
COMMENTS
This is the list of comma-successors.
LINKS
Michael S. Branicky, Table of n, a(n) for n = 1..10000
Eric Angelini, Michael S. Branicky, Giovanni Resta, N. J. A. Sloane, and David W. Wilson, The Comma Sequence: A Simple Sequence With Bizarre Properties, arXiv:2401.14346, Youtube
PROG
(Python)
def cp(n):
y = int(str(n)[0])
x = (n-y)%10
k = n - y - 10*x
kk = k + 10*x + y-1
return k if k > 0 and int(str(kk)[0]) != y-1 else -1
def ok(n): return n > 0 and cp(n) > 0
print([k for k in range(1, 119) if ok(k)]) # Michael S. Branicky, Dec 18 2023
CROSSREFS
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Nov 15 2023
STATUS
approved