A064753
a(n) = n*7^n - 1.
Original entry on oeis.org
6, 97, 1028, 9603, 84034, 705893, 5764800, 46118407, 363182462, 2824752489, 21750594172, 166095446411, 1259557135290, 9495123019885, 71213422649144, 531726889113615, 3954718737782518, 29311444762388081, 216579008522089716, 1595845325952240019, 11729463145748964146
Offset: 1
For a(n)=n*k^n-1 cf. -
A000012 (k=0),
A001477 (k=1),
A003261 (k=2),
A060352 (k=3),
A060416 (k=4),
A064751 (k=5),
A064752 (k=6), this sequence (k=7),
A064754 (k=8),
A064755 (k=9),
A064756 (k=10),
A064757 (k=11),
A064758 (k=12).
-
[ n*7^n-1: n in [1..20]]; // Vincenzo Librandi, Sep 16 2011
-
k:= 7; f:= gfun:-rectoproc({1 + (k-1)*n + k*n*a(n-1) - (n-1)*a(n) = 0, a(1) = k-1}, a(n), remember): map(f, [$1..20]); # Georg Fischer, Feb 19 2021
-
Table[n 7^n-1,{n,20}] (* or *) LinearRecurrence[{15,-63,49},{6,97,1028},20] (* Harvey P. Dale, Feb 12 2022 *)
A064756
a(n) = n*10^n - 1.
Original entry on oeis.org
9, 199, 2999, 39999, 499999, 5999999, 69999999, 799999999, 8999999999, 99999999999, 1099999999999, 11999999999999, 129999999999999, 1399999999999999, 14999999999999999, 159999999999999999, 1699999999999999999, 17999999999999999999, 189999999999999999999, 1999999999999999999999
Offset: 1
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
- Paul Leyland, Factors of Cullen and Woodall numbers.
- Paul Leyland, Generalized Cullen and Woodall numbers.
- Amelia Carolina Sparavigna, Some Groupoids and their Representations by Means of Integer Sequences, International Journal of Sciences (2019) Vol. 8, No. 10.
- Index entries for linear recurrences with constant coefficients, signature (21,-120,100).
Cf. for a(n) = n*k^n - 1: -
A000012 (k=0),
A001477 (k=1),
A003261 (k=2),
A060352 (k=3),
A060416 (k=4),
A064751 (k=5),
A064752 (k=6),
A064753 (k=7),
A064754 (k=8),
A064755 (k=9), this sequence (k=10),
A064757 (k=11),
A064758 (k=12).
-
[ n*10^n-1: n in [1..20]]; // Vincenzo Librandi, Sep 16 2011
-
k:= 10; f:= gfun:-rectoproc({1 + (k-1)*n + k*n*a(n-1) - (n-1)*a(n) = 0, a(1) = k-1}, a(n), remember): map(f, [$1..20]); # Georg Fischer, Feb 19 2021
-
Array[# 10^# - 1 &, 18] (* Michael De Vlieger, Jan 14 2020 *)
A064757
a(n) = n*11^n - 1.
Original entry on oeis.org
10, 241, 3992, 58563, 805254, 10629365, 136410196, 1714871047, 21221529218, 259374246009, 3138428376720, 37661140520651, 448795257871102, 5316497670165373, 62658722541234764, 735195677817154575, 8592599484487994106, 100078511642860166657, 1162022718519876379528
Offset: 1
Cf. for a(n) = n*k^n - 1: -
A000012(k=0),
A001477(k=1),
A003261 (k=2),
A060352 (k=3),
A060416 (k=4),
A064751 (k=5),
A064752 (k=6),
A064753 (k=7),
A064754 (k=8),
A064755 (k=9),
A064756 (k=10), this sequence (k=11),
A064758 (k=12).
-
[n*11^n - 1: n in [1..20]]; // Vincenzo Librandi, Sep 16 2011
-
k:= 11; f:= gfun:-rectoproc({1 + (k-1)*n + k*n*a(n-1) - (n-1)*a(n) = 0, a(1) = k-1}, a(n), remember): map(f, [$1..20]); # Georg Fischer, Feb 19 2021
-
Table[n*11^n-1,{n,20}] (* Harvey P. Dale, May 12 2019 *)
A064750
a(n) = n*12^n + 1.
Original entry on oeis.org
1, 13, 289, 5185, 82945, 1244161, 17915905, 250822657, 3439853569, 46438023169, 619173642241, 8173092077569, 106993205379073, 1390911669927937, 17974858503684097, 231105323618795521, 2958148142320582657, 37716388814587428865, 479219999055934390273, 6070119988041835610113
Offset: 0
-
[n*12^n + 1: n in [0..30]]; // Vincenzo Librandi, Jun 21 2018
-
Table[n*12^n+1,{n,0,20}] (* or *) LinearRecurrence[{25,-168,144},{1,13,289},20] (* Harvey P. Dale, Apr 30 2015 *)
CoefficientList[Series[(1 - 12 x + 142 x^2 - 250 x^3 + 1680 x^4 - 1440 x^5) / ((1 - 12 x)^2 (1 - x)), {x, 0, 33}], x] (* Vincenzo Librandi, Jun 21 2018 *)
-
a(n) = { n*12^n + 1 } \\ Harry J. Smith, Sep 24 2009
Showing 1-4 of 4 results.
Comments