[go: up one dir, main page]

login
Revision History for A120660 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
Trajectory of 5 under map "replace k with concatenation of anti-divisors of k".
(history; published version)
#8 by N. J. A. Sloane at Tue Jan 23 07:00:03 EST 2018
STATUS

proposed

approved

#7 by Jon E. Schoenfield at Mon Jan 22 21:19:13 EST 2018
STATUS

editing

proposed

#6 by Jon E. Schoenfield at Mon Jan 22 21:19:10 EST 2018
NAME

Trajectory of 5 under map "replace k by with concatenation of anti-divisors of k".

STATUS

approved

editing

#5 by Russ Cox at Sat Mar 31 13:48:30 EDT 2012
AUTHOR

_M. F. Hasler (maximilian.hasler(AT)gmail.com), _, Jul 26 2007

Discussion
Sat Mar 31
13:48
OEIS Server: https://oeis.org/edit/global/894
#4 by N. J. A. Sloane at Sun Jun 29 03:00:00 EDT 2008
KEYWORD

nonn,base,new

AUTHOR

Maximilian M. F. Hasler (maximilian.hasler(AT)gmail.com), Jul 26 2007

#3 by N. J. A. Sloane at Sat Nov 10 03:00:00 EST 2007
NAME

10 X 10 pentagonal prism bonding graph ( 3d analog of D5 dihedral and so(5) groups): Characteristiic polynomial: 240 x^4 + 352 x^5 + 120 x^6 - 40 x^7 - 25 x^8 + x^10.

Trajectory of 5 under map "replace k by concatenation of anti-divisors of k".

DATA

0, 12, 173, 861, 4979, 25545, 132419, 670689, 3390203, 17039337, 85505555, 428366577, 2144524907, 10730349369, 53675623811, 268448345025, 1342455212891, 6712910908041, 33566470310387, 167838076383633

5, 23, 235915, 231058199290237132541627094366157277

OFFSET

0,2

1,1

COMMENTS

In the 1960's borohydrides were structurally used as analogs to nuclear internal structure models. In this case an so(5) is an analog of a pendagonal prism by way of the D5 dihedral symmetry involved.

The next term is very large!

FORMULA

M = {{0, 1, 1, 1, 1, 1, 0, 0, 0, 0}, {1, 0, 1, 1, 1, 0, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 0, 0, 1, 0, 0}, {1, 1, 1, 0, 1, 0, 0, 0, 1, 0}, {1, 1, 1, 1, 0, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, 0, 1, 1, 1, 1}, {0, 1, 0, 0, 0, 1, 0, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 0, 1, 1, 1, 0, 1}, {0, 0, 0, 0, 1, 1, 1, 1, 1, 0}} v[1] = Table[Fibonacci[n], {n, 0, 9}] v[n_] := v[n] = M.v[n - 1] a(n) = v[n][[1]]

MATHEMATICA

M = {{0, 1, 1, 1, 1, 1, 0, 0, 0, 0}, {1, 0, 1, 1, 1, 0, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 0, 0, 1, 0, 0}, {1, 1, 1, 0, 1, 0, 0, 0, 1, 0}, {1, 1, 1, 1, 0, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, 0, 1, 1, 1, 1}, {0, 1, 0, 0, 0, 1, 0, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 0, 1, 1, 1, 0, 1}, {0, 0, 0, 0, 1, 1, 1, 1, 1, 0}} v[1] = Table[Fibonacci[n], {n, 0, 9}] v[n_] := v[n] = M.v[n - 1] a = Table[Floor[v[n][[1]]], {n, 1, 50}]

CROSSREFS
KEYWORD

nonn,newbase

AUTHOR

Roger Bagula Maximilian Hasler (rlbagulatftnmaximilian.hasler(AT)yahoogmail.com), Aug 10 2006Jul 26 2007

#2 by N. J. A. Sloane at Fri May 11 03:00:00 EDT 2007
NAME

10by10 10 X 10 pentagonal prism bonding graph ( 3d analog of D5 dihedral and so(5) groups): Characteristiic polynomial: 240 x^4 + 352 x^5 + 120 x^6 - 40 x^7 - 25 x^8 + x^10.

KEYWORD

nonn,new

nonn

AUTHOR

Roger Bagula (rlbagularlbagulatftn(AT)sbcglobalyahoo.netcom), Aug 10 2006

#1 by N. J. A. Sloane at Fri Sep 29 03:00:00 EDT 2006
NAME

10by10 pentagonal prism bonding graph ( 3d analog of D5 dihedral and so(5) groups): Characteristiic polynomial: 240 x^4 + 352 x^5 + 120 x^6 - 40 x^7 - 25 x^8 + x^10.

DATA

0, 12, 173, 861, 4979, 25545, 132419, 670689, 3390203, 17039337, 85505555, 428366577, 2144524907, 10730349369, 53675623811, 268448345025, 1342455212891, 6712910908041, 33566470310387, 167838076383633

OFFSET

0,2

COMMENTS

In the 1960's borohydrides were structurally used as analogs to nuclear internal structure models. In this case an so(5) is an analog of a pendagonal prism by way of the D5 dihedral symmetry involved.

FORMULA

M = {{0, 1, 1, 1, 1, 1, 0, 0, 0, 0}, {1, 0, 1, 1, 1, 0, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 0, 0, 1, 0, 0}, {1, 1, 1, 0, 1, 0, 0, 0, 1, 0}, {1, 1, 1, 1, 0, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, 0, 1, 1, 1, 1}, {0, 1, 0, 0, 0, 1, 0, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 0, 1, 1, 1, 0, 1}, {0, 0, 0, 0, 1, 1, 1, 1, 1, 0}} v[1] = Table[Fibonacci[n], {n, 0, 9}] v[n_] := v[n] = M.v[n - 1] a(n) = v[n][[1]]

MATHEMATICA

M = {{0, 1, 1, 1, 1, 1, 0, 0, 0, 0}, {1, 0, 1, 1, 1, 0, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 0, 0, 1, 0, 0}, {1, 1, 1, 0, 1, 0, 0, 0, 1, 0}, {1, 1, 1, 1, 0, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, 0, 1, 1, 1, 1}, {0, 1, 0, 0, 0, 1, 0, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 0, 1, 1, 1, 0, 1}, {0, 0, 0, 0, 1, 1, 1, 1, 1, 0}} v[1] = Table[Fibonacci[n], {n, 0, 9}] v[n_] := v[n] = M.v[n - 1] a = Table[Floor[v[n][[1]]], {n, 1, 50}]

KEYWORD

nonn

AUTHOR

Roger Bagula (rlbagula(AT)sbcglobal.net), Aug 10 2006

STATUS

approved