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.

A195266 Trajectory of 105 under iteration of the map x -> A080670(x).

Original entry on oeis.org

105, 357, 3717, 32759, 174147, 358049, 379677, 3196661, 13245897, 373120347, 31961239449, 364811643843, 3474632755849, 7148938489519, 19530970872089, 731453184134581, 1069684240583849, 11451757737372871, 18163269379764491, 99042547183388553, 344278174560973471, 71388716692555572127, 148872380947952962303, 1453102458624189919451, 11245912921175349453489
Offset: 1

Views

Author

N. J. A. Sloane, Sep 14 2011, based on a posting to the Sequence Fans Mailing List by Alonso del Arte

Keywords

Crossrefs

Programs

  • Maple
    read("transforms");
    # insert A080670 here
    A195266 := proc(n)
            option remember;
            if n = 1 then
                    105;
            else
                    A080670(procname(n-1)) ;
            end if;
    end proc: # R. J. Mathar, Oct 02 2011

A194266 Smallest sum of two distinct primes of the form n*k+1.

Original entry on oeis.org

5, 8, 20, 18, 42, 20, 72, 58, 56, 42, 90, 50, 132, 72, 92, 114, 240, 56, 420, 102, 170, 90, 186, 170, 252, 132, 272, 142, 292, 92, 684, 290, 266, 240, 282, 110, 372, 420, 236, 282, 822, 170, 604, 442, 452, 186, 942, 290, 688, 252, 410, 210, 850, 272, 992
Offset: 1

Views

Author

Omar E. Pol, Sep 03 2011

Keywords

Examples

			a(1) = 2+3 = 5
a(2) = 3+5 = 8
a(3) = 7+13 = 20
a(4) = 5+13 = 18
a(5) = 11+31 = 42
a(6) = 7+13 = 20
		

Crossrefs

Programs

  • Mathematica
    Table[ps = Select[Table[n*k + 1, {k, 100}], PrimeQ, 2]; If[Length[ps] == 2, Total[ps], 0], {n, 100}] (* T. D. Noe, Oct 21 2011 *)
Showing 1-2 of 2 results.