cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-2 of 2 results.

A090728 a(n) = 20*a(n-1) - a(n-2), starting with a(0) = 2 and a(1) = 20.

Original entry on oeis.org

2, 20, 398, 7940, 158402, 3160100, 63043598, 1257711860, 25091193602, 500566160180, 9986232009998, 199224074039780, 3974495248785602, 79290680901672260, 1581839122784659598, 31557491774791519700, 629567996373045734402, 12559802435686123168340
Offset: 0

Views

Author

Nikolay V. Kosinov (kosinov(AT)unitron.com.ua), Jan 18 2004

Keywords

Comments

Except for the first term, positive values of x (or y) satisfying x^2 - 20xy + y^2 + 396 = 0. - Colin Barker, Feb 28 2014

Crossrefs

Programs

  • Mathematica
    a[0] = 2; a[1] = 20; a[n_] := 20a[n - 1] - a[n - 2]; Table[ a[n], {n, 0, 15}] (* Robert G. Wilson v, Jan 30 2004 *)
  • PARI
    Vec((2-20*x)/(1-20*x+x^2) + O(x^100)) \\ Colin Barker, Feb 28 2014
  • Sage
    [lucas_number2(n,20,1) for n in range(0,20)] # Zerinvary Lajos, Jun 27 2008
    

Formula

a(n) = p^n + q^n, where p = 10 + 3*sqrt(11) and q = 10 - 3*sqrt(11). - Tanya Khovanova, Feb 06 2007
G.f.: (2-20*x)/(1-20*x+x^2). - Philippe Deléham, Nov 02 2008

Extensions

More terms from Robert G. Wilson v, Jan 30 2004
More terms from Colin Barker, Feb 28 2014

A378252 Least prime power > 2^n.

Original entry on oeis.org

2, 3, 5, 9, 17, 37, 67, 131, 257, 521, 1031, 2053, 4099, 8209, 16411, 32771, 65537, 131101, 262147, 524309, 1048583, 2097169, 4194319, 8388617, 16777259, 33554467, 67108879, 134217757, 268435459, 536870923, 1073741827, 2147483659, 4294967311, 8589934609
Offset: 0

Views

Author

Gus Wiseman, Nov 30 2024

Keywords

Comments

Prime powers are listed by A246655.
Conjecture: All terms except 9 are prime. Hence this is the same as A014210 after 9. Confirmed up to n = 1000.

Crossrefs

Subtracting 2^n appears to give A013597 except at term 3.
For prime we have A014210.
For previous we have A014234.
For perfect power we have A357751.
For squarefree we have A372683.
A000015 gives the least prime power >= n.
A000040 lists the primes, differences A001223.
A000961 and A246655 list the prime powers, differences A057820.
A024619 and A361102 list the non prime powers, diffs A375708 and A375735.
A031218 gives the greatest prime power <= n.
A244508 counts prime powers between powers of 2.
Prime powers between primes are counted by A080101 and A366833.

Programs

  • Mathematica
    Table[NestWhile[#+1&,2^n+1,!PrimePowerQ[#]&],{n,0,20}]
  • PARI
    a(n) = my(x=2^n+1); while (!isprimepower(x), x++); x; \\ Michel Marcus, Dec 03 2024
  • Python
    from itertools import count
    from sympy import primefactors
    def A378252(n): return next(i for i in count(1+(1<Chai Wah Wu, Dec 02 2024
    
Showing 1-2 of 2 results.