|
Search: id:A132728
|
|
|
| A132728 |
|
A triangular sequence related to the Pythagorean scale: v(n,m)=v[0]*2^n*3*m. |
|
+0
2
|
|
| 1, 1, 7, 1, 7, 1, 1, 7, 1, 7, 1, 7, 1, 7, 1, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1
(list; table; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
COMMENT
|
Differs from A132742 in the order in which n and m are handled.
|
|
FORMULA
|
a(n,m) = 1 + Mod[2*n*3^m, 12]
|
|
EXAMPLE
|
{1},
{1, 7},
{1, 7, 1},
{1, 7, 1, 7},
{1, 7, 1, 7, 1},
{1, 7, 1, 7, 1, 7},
{1, 7, 1, 7, 1, 7, 1},
{1, 7, 1, 7, 1, 7, 1, 7},
{1, 7, 1, 7, 1, 7, 1, 7, 1}
{1, 7, 1, 7, 1, 7, 1, 7, 1, 7},
{1, 7, 1, 7, 1, 7, 1, 7, 1, 7, 1}
|
|
MATHEMATICA
|
a = Table[Table[1 + Mod[2*n*3^m, 12], {n, 0, m}], {m, 0, 10}]; Flatten[a]
|
|
CROSSREFS
|
Sequence in context: A086309 A060625 A019796 this_sequence A083530 A010688 A033953
Adjacent sequences: A132725 A132726 A132727 this_sequence A132729 A132730 A132731
|
|
KEYWORD
|
nonn,tabl,uned
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Nov 17 2007
|
|
|
Search completed in 0.002 seconds
|
