login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A129754 The natural numbers represented by their set theoretic Von Neumann construction, where the empty set is replaced by '0', the left set bracket '{' is replaced by 1, the right bracket '}' is replaced by 2, the set construct contents are ordered by increasing cardinality and the final number is interpreted in base 3. 1
11, 278, 202040, 107371882880, 30324991112647875920960, 2418916677393691552133618294938847890243982720, 15390805926573768302084260548391044837412074858741153833336080616936611834819590898337488640 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

LINKS

Table of n, a(n) for n=0..6.

FORMULA

S(n) = n union {n}

EXAMPLE

a(0)=0=0[3]=0, a(1)={0}=102[3]=11, a(2)={0,{0}}=101022[3]=278, etc

MAPLE

N:=proc(n) local i, s, l, r, data; s:=`0`; l:=`1`; r:=`2`; if n>0 then for i from 1 to n-1 do s:=cat(s, l, s, r); od; s:=cat(l, s, r); fi; data:=sscanf(s, `%d`); RETURN(data[1]); end: b3tob10:=proc(n) local i, nl, sl, suma; if n=0 then suma:=0; else sl:=convert(n, base, 10); nl:=convert(sl, base, 3, 10); suma:=sum(nl[i]*10^(i-1), i=1..nops(nl)); fi; RETURN(suma); end: for n from 0 to 7 do b3tob10(N(n)); od;

CROSSREFS

Cf. A129751.

Sequence in context: A062210 A049080 A210807 * A103547 A171195 A274780

Adjacent sequences:  A129751 A129752 A129753 * A129755 A129756 A129757

KEYWORD

easy,nonn,base

AUTHOR

I.N. Galidakis (jgal(AT)ath.forthnet.gr), May 14 2007

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 7 10:15 EDT 2021. Contains 343649 sequences. (Running on oeis4.)