This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A063683 #7 May 01 2014 02:47:51 %S A063683 1,3,6,21,50,108,364,987,1938,6150,17622,34776,121160,306852,549000, %T A063683 2178309,5701290,11197764,39083988,93031050,191708244,697884066, %U A063683 1836283246,3605645232,11442062750,32888033880,64700678454 %N A063683 Integers formed from the reduced residue sets of even numbers and Fibonacci numbers. %C A063683 a(2n) = L(2n)*a(n), where L(2n) is the 2n-th Lucas number = A000032(2n). %F A063683 a(n) = Sum_{i | gcd(i, 2n)=1} Fib(i) (where Fib(i) = A000045[i]) %e A063683 The reduced residue set of 2*6 = 12 is {1,5,7,11}, thus a(6) = F_1 + F_5 + F_7 + F_11 = 108. %p A063683 A063683 := [seq(A063683_as_sum(2*n), n=1..101)]; A063683_as_sum := proc(n) local i; RETURN(add((one_or_zero(igcd(n,i))*fibonacci(i)),i=1..(n-1))); end; Yours, Antti Karttunen %Y A063683 Cf. A054432, A054433, A050611. %K A063683 nonn %O A063683 1,2 %A A063683 _Antti Karttunen_, Jul 31 2001