%I A140697
%S A140697 1,5,11,18,29,55,55,72,96,145,131,198,181,275,319,288,305,480,379,522,
%T A140697 605,655,551,792,720,905,864,990,869,1595,991,1152,1441,1525,1595,1728,
%U A140697 1405,1895,1991,2088,1721,3025,1891,2358,2784,2755,2255,3168,2688,3600
%N A140697 Mobius transform of A000082.
%e A140697 a(4) = 18 = (0, -1, 0, 1) dot (1, 6, 12, 24), where (0, -1 0, 1) = row 
               4 of A054525 and A000082 = (1, 6, 12, 24, 30, 72,...).
%p A140697 with (numtheory): a:= n-> add (k^2* mul(1+1/p, p=select (isprime, divisors(k)))* 
               mobius(n/k), k=divisors(n)): seq (a(n), n=1..60); [From Alois P. 
               Heinz (heinz(AT)hs-heilbronn.de), Aug 28 2008]
%Y A140697 Cf. A000082.
%Y A140697 Sequence in context: A056000 A080566 A094684 this_sequence A048253 A102174 
               A140515
%Y A140697 Adjacent sequences: A140694 A140695 A140696 this_sequence A140698 A140699 
               A140700
%K A140697 nonn,easy
%O A140697 1,2
%A A140697 Gary W. Adamson (qntmpkt(AT)yahoo.com), May 23 2008
%E A140697 Definition corrected by N. J. A. Sloane (njas(AT)research.att.com), Jul 
               28 2008
%E A140697 More terms from Alois P. Heinz (heinz(AT)hs-heilbronn.de), Aug 28 2008