Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A107783
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A107783 Array defined in A064643 read in direction in which it was created. +0
2
1, 1, 2, 1, 5, 6, 1, 13, 21, 22, 1, 45, 84, 104, 105, 1, 211, 412, 562, 630, 631, 1, 1263, 2500, 3558, 4285, 4602, 4603, 1, 9207, 18305, 26560, 33180, 37573, 39468, 39469, 1, 78939, 157243, 230496, 293794, 342944, 375058, 388869, 388870, 1, 777741 (list; table; graph; listen)
OFFSET

0,3

MAPLE

A107783 := proc(n, k) option remember ; if n < 0 or k < 0 or k > n then 0 ; elif n =0 then 1; elif n mod 2 = 1 then if n = k then 1; else A107783(n, k+1)+A107783(n-1, k-1)+A107783(n-1, k)+A107783(n-2, k-1) ; fi ; else if k = 0 then 1; else A107783(n, k-1)+A107783(n-1, k-1)+A107783(n-1, k)+A107783(n-2, k-1) ; fi ; fi ; end: for n from 0 to 11 do if ( n mod 2 ) = 1 then kstrt := n ; else kstrt := 0 ; fi ; kend := n-kstrt : for k from kstrt to kend by sign(kend-kstrt) do printf("%d, ", A107783(n, k)) ; od: od: - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Aug 13 2007

CROSSREFS

Cf. A064642, A064643, A064644.

Sequence in context: A167638 A054651 A145324 this_sequence A047887 A120986 A095801

Adjacent sequences: A107780 A107781 A107782 this_sequence A107784 A107785 A107786

KEYWORD

nonn,tabl,easy

AUTHOR

N. J. A. Sloane (njas(AT)research.att.com), Jun 15 2005

EXTENSIONS

More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Aug 13 2007

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified November 23 17:09 EST 2009. Contains 167438 sequences.


AT&T Labs Research