|
| |
| |
|
|
|
1, 1, 3, 3, 7, 3, 11, 7, 12, 7, 19, 9, 23, 11, 21, 16, 31, 12, 35, 21, 33, 19, 43, 21, 48, 23, 44, 33, 55, 21, 59, 36, 57, 31, 77, 36, 71, 35, 69, 49, 79, 33, 83, 57, 84, 43, 91, 48, 108, 48, 93, 69, 103, 44, 133, 77, 105, 55, 115, 63, 119, 59, 132, 80, 161, 57, 131, 93, 129
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
FORMULA
| Mobius transform (A054525) of A029935: (1, 2, 4, 5, 8, 8, 12, 12, 16,...).
|
|
|
EXAMPLE
| a(4) = 3 = (0, -1, 0, 1) dot (1, 2, 4, 5) = (0 - 2 + 0 + 5), where K(0, -1, 0, 1) = row 4 of A054525 and A143275 = (1, 2, 4, 5, 8, 8, 12,...).
|
|
|
MAPLE
| read("transforms") : A029935 := proc(n) local a, d ; a := 0 ; for d in numtheory[divisors](n) do a := a+ numtheory[phi](d)*numtheory[phi](n/d); od; RETURN(a) ; end: a029935 := [seq(A029935(n), n=1..300)] ; a143275 := MOBIUS(a029935) ; [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jan 19 2009]
|
|
|
CROSSREFS
| Cf. A029935, A054525.
Sequence in context: A204204 A164928 A069949 * A083262 A122978 A119347
Adjacent sequences: A143272 A143273 A143274 * A143276 A143277 A143278
|
|
|
KEYWORD
| nonn,mult
|
|
|
AUTHOR
| Gary W. Adamson (qntmpkt(AT)yahoo.com), Aug 03 2008
|
|
|
EXTENSIONS
| More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jan 19 2009
|
| |
|
|
