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.

Previous Showing 11-14 of 14 results.

A054565 Numbers n such that 3 is the first digit of 3^n.

Original entry on oeis.org

1, 18, 20, 22, 41, 43, 62, 64, 66, 83, 85, 87, 106, 108, 110, 127, 129, 131, 150, 152, 171, 173, 175, 194, 196, 215, 217, 219, 236, 238, 240, 259, 261, 263, 280, 282, 284, 303, 305, 324, 326, 328, 347, 349, 368, 370, 372, 389, 391, 393, 412, 414, 416, 433
Offset: 1

Views

Author

Benoit Cloitre, Feb 22 2002

Keywords

Crossrefs

Cf. A067481.

Programs

  • Mathematica
    Select[Range[500],First[IntegerDigits[3^#]]==3&] (* Harvey P. Dale, Dec 23 2012 *)
  • PARI
    for(n=1,100, if(floor(3^n/10^(floor(n*log(3)/log(10))))==3,print1(n,",")))

Extensions

Corrected by T. D. Noe, Nov 01 2006
Corrected by Harvey P. Dale, Dec 23 2012

A067493 Powers of 7 with initial digit 1.

Original entry on oeis.org

1, 16807, 117649, 1977326743, 13841287201, 1628413597910449, 11398895185373143, 191581231380566414401, 1341068619663964900807, 157775382034845806615042743, 1104427674243920646305299201
Offset: 1

Views

Author

Amarnath Murthy, Feb 09 2002

Keywords

Crossrefs

Programs

  • GAP
    Filtered(List([0..40],n->7^n),i->ListOfDigits(i)[1]=1); # Muniru A Asiru, Oct 22 2018

Extensions

Offset 1 by Michel Marcus, Oct 19 2018

A067494 Powers of 8 with initial digit 1.

Original entry on oeis.org

1, 16777216, 134217728, 1073741824, 18014398509481984, 144115188075855872, 1152921504606846976, 19342813113834066795298816, 154742504910672534362390528, 1237940039285380274899124224
Offset: 1

Views

Author

Amarnath Murthy, Feb 09 2002

Keywords

Crossrefs

Programs

  • GAP
    Filtered(List([0..40],n->8^n),i->ListOfDigits(i)[1]=1); # Muniru A Asiru, Oct 22 2018
  • Mathematica
    Select[8^Range[0,30],IntegerDigits[#][[1]]==1&] (* Harvey P. Dale, Jun 10 2023 *)

Extensions

Offset 1 by Michel Marcus, Oct 19 2018

A067495 Powers of 9 having initial digit 1.

Original entry on oeis.org

1, 1853020188851841, 16677181699666569, 150094635296999121, 1350851717672992089, 12157665459056928801, 109418989131512359209, 1824800363140073127359051977856583921, 16423203268260658146231467800709255289, 147808829414345923316083210206383297601
Offset: 1

Views

Author

Amarnath Murthy, Feb 09 2002

Keywords

Crossrefs

Programs

  • GAP
    Filtered(List([0..40],n->9^n),i->ListOfDigits(i)[1]=1); # Muniru A Asiru, Oct 22 2018
  • Maple
    select(x-> "1"=""||x[1],[9^n$n=0..60])[];  # Alois P. Heinz, Oct 22 2018
  • Mathematica
    Select[9^Range[0,50],First[IntegerDigits[#]]==1&] (* Harvey P. Dale, Oct 01 2015 *)

Extensions

More terms from Harvey P. Dale, Oct 01 2015
Previous Showing 11-14 of 14 results.