login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A367355 Comma sequence, analogous to A121805, starting at 1, but the calculations are done in base 3. 13
1, 5, 12, 13, 17, 25, 29, 36, 37, 41, 48, 49, 53, 61, 66, 68, 76 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
MAPLE
# Comma Successor in Maple in base "bas", from N. J. A. Sloane, Dec 06 2023
bas := 3;
Ldigit:=proc(n) local v; v:=convert(n, base, bas); v[-1]; end; # Returns leading digit
# Return comma-successor to a or -1 if no successor exists
commsucc := proc(a) local f, i, d;
f := (a mod bas);
d:=bas*f;
for i from 1 to bas-1 do
d := d+1;
if Ldigit(a+d) = i then return(a+d); fi;
od:
return(-1);
end;
a:=[1]; s:=1; for n from 1 to 16 do s:=commsucc(s); a:=[op(a), s]; od: a;
CROSSREFS
A367605 and A367605 give the length and last term for the analogous sequence in base b.
Sequence in context: A263580 A110134 A014156 * A367621 A114073 A286242
KEYWORD
nonn,base,fini,full
AUTHOR
N. J. A. Sloane, Nov 18 2023
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 21 06:16 EST 2024. Contains 370219 sequences. (Running on oeis4.)