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

A073633 Numbers k that divide floor((3/2)^k) = A002379(k).

Original entry on oeis.org

1, 2, 3, 16, 43, 50, 56, 193, 283, 961, 970, 4958, 9439, 10493, 11375, 18552, 57051, 81602, 617287, 917186, 1525995, 5107085, 9162821, 22008620
Offset: 1

Views

Author

Benoit Cloitre, Aug 29 2002

Keywords

Comments

No more terms through 10^6. - Ryan Propper, May 05 2006
The first 8 terms are all in A032863, all known subsequent terms, i.e., at least up to a(21), are not in A032863. - M. F. Hasler, Oct 05 2018

Crossrefs

Programs

  • Mathematica
    t = 1; Do[t = 3t/2; If[ Mod[ Floor[t], n] == 0, Print[n]], {n, 500000}] (* Robert G. Wilson v, Apr 06 2006 *)
  • PARI
    a=1;for(n=1,10^6,a*=3;b=shift(a,-n);if(b%n==0,print1(n,","))) \\ Robert Gerbicz, Aug 23 2006
    
  • PARI
    P=1;for(n=1,oo,(P*=3)>>n%n||print1(n",")) \\ M. F. Hasler, Oct 05 2018
    
  • Python
    from gmpy2 import mpz, t_div_2exp, t_mod
    A073633_list, m = [], mpz(1)
    for n in range(1,10**9):
        m *= 3
        if t_mod(t_div_2exp(m,n),n) == 0:
            A073633_list.append(n) # Chai Wah Wu, Mar 30 2020

Extensions

More terms from Michel ten Voorde Jun 20 2003
2 more terms from Ryan Propper, May 05 2006
More terms from Robert Gerbicz, Aug 23 2006
a(22)-a(24) from Chai Wah Wu, Mar 30 2020

A306110 Numbers with digits in {0,...,7} such that every other digit is strictly less than its neighbors.

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 6, 7, 10, 20, 21, 30, 31, 32, 40, 41, 42, 43, 50, 51, 52, 53, 54, 60, 61, 62, 63, 64, 65, 70, 71, 72, 73, 74, 75, 76, 101, 102, 103, 104, 105, 106, 107, 201, 202, 203, 204, 205, 206, 207, 212, 213, 214, 215, 216, 217, 301, 302, 303, 304, 305, 306, 307, 312, 313, 314, 315, 316, 317, 323, 324, 325
Offset: 1

Views

Author

M. F. Hasler, Oct 05 2018

Keywords

Comments

Terms of A032863 written in base 8.

Crossrefs

Cf. A306105 .. A306111 and A297147: analog for bases 3..9 and 10.
Cf. A032863 and A032858 .. A032865 for other bases 3..10.

Programs

  • PARI
    A(Nmax=100,K=7,A=[0..K],i=vector(2*K,i,max(1,i-K+1)),c(T,v)=apply(t->t+T,v))={for(n=0,oo, for(k=10,K*11,if(k%10
    				

Formula

a(n) = A007094(A032863(n)).

A306109 Numbers with digits in {0,...,6} such that every other digit is strictly less than its neighbors.

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 6, 10, 20, 21, 30, 31, 32, 40, 41, 42, 43, 50, 51, 52, 53, 54, 60, 61, 62, 63, 64, 65, 101, 102, 103, 104, 105, 106, 201, 202, 203, 204, 205, 206, 212, 213, 214, 215, 216, 301, 302, 303, 304, 305, 306, 312, 313, 314, 315, 316, 323, 324, 325, 326, 401, 402, 403, 404, 405, 406, 412, 413, 414, 415
Offset: 1

Views

Author

M. F. Hasler, Oct 05 2018

Keywords

Comments

Terms of A032862 written in base 7.

Crossrefs

Cf. A306105 .. A306111 and A297147: analog for bases 3..9 and 10.
Cf. A032863 and A032858 .. A032865 for other bases 3..10.

Programs

  • PARI
    A(Nmax=100, K=6, A=[0..K], i=vector(2*K, i, max(1, i-K+1)), c(T, v)=apply(t->t+T, v))={for(n=0, oo, for(k=10, K*11, if(k%10
    				

Formula

a(n) = A007093(A032862(n)).
Showing 1-3 of 3 results.