|
Search: id:A014735
|
|
|
| A014735 |
|
Squares of odd numbers in triangle of Eulerian numbers that are not 1. |
|
+0
2
|
|
| 121, 121, 3249, 3249, 1418481, 1418481, 61009, 18429849, 243953161, 243953161, 18429849, 61009, 1026169, 1026169, 23298053769, 23298053769, 16670889, 228743149441, 103788925659225, 103788925659225, 228743149441
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
A014735 = Select[Select[Flatten[Table[Plus @@ Table[(-1)^k*Binomial[i + 1, k]*(j - k)^i, {k, 0, j}], {i, 1, 15}, {j, 1, i}]], OddQ], # != 1 &]^2
|
|
CROSSREFS
|
Sequence in context: A109838 A014734 A137517 this_sequence A137850 A036231 A055468
Adjacent sequences: A014732 A014733 A014734 this_sequence A014736 A014737 A014738
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Mohammad K. Azarian (ma3(AT)evansville.edu)
|
|
EXTENSIONS
|
More terms and Mathematica program from Keith Schneider, Jul 03 2007
|
|
|
Search completed in 0.002 seconds
|
