|
| |
|
|
A117175
|
|
The Shift-Moebius transform of [1,2,3,4,...].
|
|
3
| |
|
|
1, 1, 1, 1, 1, 0, 1, 0, -1, -2, 0, -3, 0, -5, -6, -4, -2, -7, -3, -8, -7, -6, -4, -9, -5, -9, -10, -9, -2, -9, 3, -2, -4, -4, -7, -2, 9, 2, -7, 2, 9, 5, 14, 10, 7, 21, 20, 20, 28, 21, 20, 28, 35, 31, 28, 44, 45, 56, 50, 53, 65, 62, 37, 61, 54, 66, 69, 71, 59, 75, 83, 93, 97, 92, 60, 87, 74, 99, 95, 106, 98, 117, 104, 102
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,10
|
|
|
COMMENTS
| See triangle A117165 for the definition of the Shift-Moebius transform.
|
|
|
FORMULA
| a(n) = Sum_{k=1,n} A117165(n,k)*k.
|
|
|
PROG
| (PARI) {a(n)=sum(k=1, n, prod(i=0, n, matrix(n, n, r, c, if(r>=c, if((r+n-i)%(c+n-i)==0, moebius((r+n-i)/(c+n-i)), 0))))[ n, k]*k)}
|
|
|
CROSSREFS
| Cf. A117165, A117176.
Sequence in context: A008799 A011013 A138325 * A090482 A082857 A081155
Adjacent sequences: A117172 A117173 A117174 * A117176 A117177 A117178
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Wouter Meeussen (wouter.meeussen(AT)pandora.be) and Paul D. Hanna (pauldhanna(AT)juno.com), Mar 05 2006
|
| |
|
|
