%I A064274
%S A064274 0,1,2,4,3,7,6,5,11,10,9,8,15,16,21,14,13,28,12,36,20,22,45,27,19,55,18,
%T A064274 66,35,17,78,44,26,91,29,105,54,34,120,25,136,65,24,153,77,43,171,23,
%U A064274 190,90,53,210,33,231,104,37,253,119,64,276,42,300,135,32
%N A064274 Inverse of sequence A035513 considered as a permutation of the nonnegative 
               integers.
%H A064274 <a href="Sindx_Per.html#IntegerPermutation">Index entries for sequences 
               that are permutations of the natural numbers</a>
%p A064274 Digits := 30 : A035513 := proc(n,k) local tau ; tau := (sqrt(5)+1)/2 
               ; combinat[fibonacci](k+1)*floor(n*tau)+(n-1)*combinat[fibonacci](k) 
               ; end: A035513flat := proc(N) local r,c,k,np,n ; n := 1 : k := 1 
               : for np from 2 to N do n := n+1 : k := k-1 : if k = 0 then k := 
               n: n := 1: fi ; od ; A035513(n,k) ; end: a035513 := [] : a := -1 
               : nmax := 300 : for n from 1 to nmax do a035513 := [op(a035513),A035513flat(n)] 
               : od : printf("0, ") ; n := 1: while true do if member(n,a035513,
               'a') then printf("%d, ",a) ; else break ; fi ; n := n+1 : od: - R. 
               J. Mathar (mathar(AT)strw.leidenuniv.nl), Jun 26 2007
%Y A064274 Cf. A035513.
%Y A064274 Sequence in context: A056536 A108228 A127008 this_sequence A035513 A114537 
               A021808
%Y A064274 Adjacent sequences: A064271 A064272 A064273 this_sequence A064275 A064276 
               A064277
%K A064274 easy,nonn
%O A064274 0,3
%A A064274 Howard A. Landman (howard(AT)polyamory.org), Sep 23 2001
%E A064274 More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jun 26 2007