Search: id:A064274 Results 1-1 of 1 results found. %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 Index entries for sequences that are permutations of the natural numbers %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 Search completed in 0.001 seconds