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-7 of 7 results.

A075010 a(n) = floor( concatenation of 9 numbers from n+8 to n in that order divided by 9 ).

Original entry on oeis.org

97393690, 109739369, 122085048, 1234430727, 13456776406, 145790122085, 1570134567764, 16823680123443, 179460145790122, 1906834903467901, 20190683490346790, 21313017946014579, 22435352401682368, 23557686857350157, 24680021313017946, 25802355768685735
Offset: 0

Views

Author

Amarnath Murthy, Sep 01 2002

Keywords

Crossrefs

Programs

  • Mathematica
    Table[Floor[FromDigits[Flatten[IntegerDigits/@Range[n+8,n,-1]]]/9],{n,0,20}] (* Harvey P. Dale, Aug 04 2019 *)

Extensions

More terms from Sascha Kurz, Jan 14 2003
Corrected and extended by Harvey P. Dale, Aug 04 2019

A075004 Floor[ concatenation of n+2, n+1 and n divided by 3 ].

Original entry on oeis.org

70, 107, 144, 181, 218, 255, 292, 329, 366, 3703, 40370, 43737, 47104, 50471, 53838, 57205, 60572, 63939, 67306, 70673, 74040, 77407, 80774, 84141, 87508, 90875, 94242, 97609, 100976, 104343, 107710, 111077, 114444, 117811, 121178, 124545
Offset: 0

Views

Author

Amarnath Murthy, Sep 01 2002

Keywords

Examples

			Sequence exhibits similar properties to A074991.
		

Crossrefs

Programs

  • Maple
    70, 107, 144, 181, 218, 255, 292, 329, 366, 3703, seq(floor(((n+2)*10^4+(n+1)*10^2+n)/3),n=10..99);

Extensions

More terms from Sascha Kurz, Jan 14 2003

A075005 Floor[ concatenation of n+3, n+2, n+1 and n divided by 4 ].

Original entry on oeis.org

802, 1080, 1358, 1635, 1913, 2191, 2469, 2746, 27774, 302777, 3280277, 3532802, 3785328, 4037853, 4290378, 4542903, 4795429, 5047954, 5300479, 5553004, 5805530, 6058055, 6310580, 6563105, 6815631, 7068156, 7320681, 7573206
Offset: 0

Views

Author

Amarnath Murthy, Sep 01 2002

Keywords

Crossrefs

Programs

  • Maple
    seq(floor(((n+3)*1000+(n+2)*100+(n+1)*10+n)/4), n=0..7), floor(111098/4), floor(1211109/4), seq(floor(((n+3)*1000^2+(n+2)*100^2+(n+1)*10^2+n)/4), n=10..99);

Extensions

More terms from Sascha Kurz, Jan 14 2003

A075007 a(n) = floor(concatenation of n+5, n+4, n+3, n+2, n+1 and n divided by 6).

Original entry on oeis.org

90535, 109053, 127572, 146090, 164609, 183127, 1851646, 20185164, 218685183, 2355201851, 25235520185, 26919021868, 28602523552, 30286025235, 31969526919, 33653028602, 35336530286, 37020031969, 38703533653, 40387035336
Offset: 0

Views

Author

Amarnath Murthy, Sep 01 2002

Keywords

Crossrefs

Programs

  • Maple
    f:= proc(n) local i; floor(parse(cat(seq(i,i=n+5 .. n, -1)))/6) end proc:
    map(f, [$0..40]); # Robert Israel, Jan 11 2024
  • Mathematica
    fc[n_]:=Module[{c=Reverse[n]},Floor[FromDigits[Flatten[IntegerDigits/@ c]]/ 6]]; fc/@Partition[Range[0,30],6,1] (* Harvey P. Dale, Nov 09 2014 *)

Extensions

More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 18 2003

A075008 Floor[ concatenation of 7 numbers from n+6 to n in that order divided by 7].

Original entry on oeis.org

934744, 1093474, 1252204, 1410934, 1569664, 15871252, 173015696, 1874444426, 20187444442, 216304458729, 2307344731587, 2451644875887, 2595945020187, 2740245164487, 2884545308787, 3028845453087, 3173145597388, 3317445741688
Offset: 0

Views

Author

Amarnath Murthy, Sep 01 2002

Keywords

Crossrefs

Programs

  • Mathematica
    Table[Floor[FromDigits[Flatten[IntegerDigits/@Range[n+6,n,-1]]]/7],{n,0,20}] (* Harvey P. Dale, May 20 2021 *)

Extensions

More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 18 2003

A075009 Floor[ concatenation of 8 numbers from n+7 to n in that order divided by 8].

Original entry on oeis.org

9567901, 10956790, 12345679, 13734567, 138873456, 1513887345, 16401388734, 176640138873, 1892664013887, 20189266401388, 214518926640138, 227145189266401, 239771451892664, 252397714518926, 265023977145189
Offset: 0

Views

Author

Amarnath Murthy, Sep 01 2002

Keywords

Crossrefs

Programs

  • Mathematica
    Table[Floor[FromDigits[Flatten[IntegerDigits/@Range[n,n-7,-1]]]/8], {n,7,30}] (* Harvey P. Dale, Feb 14 2016 *)

Extensions

More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 18 2003

A075006 Floor[ concatenation of n+4, n+3, n+2, n+1 and n divided by 5].

Original entry on oeis.org

8642, 10864, 13086, 15308, 17530, 19753, 21975, 222197, 2422219, 26242221, 282624222, 302826242, 323028262, 343230282, 363432302, 383634323, 403836343, 424038363, 444240383, 464442403, 484644424, 504846444, 525048464, 545250484
Offset: 0

Views

Author

Amarnath Murthy, Sep 01 2002

Keywords

Crossrefs

Extensions

More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 18 2003
Showing 1-7 of 7 results.