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 31-40 of 92 results. Next

A090570 Numbers that are congruent to {0, 1} mod 9.

Original entry on oeis.org

0, 1, 9, 10, 18, 19, 27, 28, 36, 37, 45, 46, 54, 55, 63, 64, 72, 73, 81, 82, 90, 91, 99, 100, 108, 109, 117, 118, 126, 127, 135, 136, 144, 145, 153, 154, 162, 163, 171, 172, 180, 181, 189, 190, 198, 199, 207, 208, 216, 217, 225, 226
Offset: 1

Views

Author

Giovanni Teofilatto, Feb 25 2004

Keywords

Examples

			13 is 1101 in base 2, so a(13+1) = a(14) = 36*1 + 18*1 + 9*0 + 1*1 = 36+18+1 = 55. - _Philippe Deléham_, Oct 17 2011
		

Crossrefs

Union of A008591 and A017173. - Reinhard Zumkeller, Oct 10 2008

Programs

Formula

A145389(a(n)) = A010888(a(n)). - Reinhard Zumkeller, Oct 10 2008
a(n) = 9*n - a(n-1) - 17 (with a(1)=0). - Vincenzo Librandi, Nov 16 2010
From R. J. Mathar, Oct 08 2011: (Start)
a(n) = 9*n/2 - 25/4 - 7*(-1)^n/4.
G.f.: x^2*(1+8*x)/( (1+x)*(1-x)^2 ). (End)
a(n+1) = Sum_{k>=0} A030308(n,k)*A005010(k-1), with A005010(-1)=1. - Philippe Deléham, Oct 17 2011.
E.g.f.: 8 + ((18*x - 25)*exp(x) - 7*exp(-x))/4. - David Lovler, Sep 03 2022

A094053 Triangle read by rows: T(n,k) = k*(n-k), 1 <= k <= n.

Original entry on oeis.org

0, 1, 0, 2, 2, 0, 3, 4, 3, 0, 4, 6, 6, 4, 0, 5, 8, 9, 8, 5, 0, 6, 10, 12, 12, 10, 6, 0, 7, 12, 15, 16, 15, 12, 7, 0, 8, 14, 18, 20, 20, 18, 14, 8, 0, 9, 16, 21, 24, 25, 24, 21, 16, 9, 0, 10, 18, 24, 28, 30, 30, 28, 24, 18, 10, 0, 11, 20, 27, 32, 35, 36, 35, 32, 27, 20, 11, 0, 12
Offset: 1

Views

Author

Reinhard Zumkeller, May 31 2004

Keywords

Comments

T(n,k) = A003991(n-1,k) for 1 <= k < n;
T(n,k) = T(n,n-1-k) for k < n;
T(n,1) = n-1; T(n,n) = 0; T(n,2) = A005843(n-2) for n > 1;
T(n,3) = A008585(n-3) for n>2; T(n,4) = A008586(n-4) for n > 3;
T(n,5) = A008587(n-5) for n>4; T(n,6) = A008588(n-6) for n > 5;
T(n,7) = A008589(n-7) for n>6; T(n,8) = A008590(n-8) for n > 7;
T(n,9) = A008591(n-9) for n>8; T(n,10) = A008592(n-10) for n > 9;
T(n,11) = A008593(n-11) for n>10; T(n,12) = A008594(n-12) for n > 11;
T(n,13) = A008595(n-13) for n>12; T(n,14) = A008596(n-14) for n > 13;
T(n,15) = A008597(n-15) for n>14; T(n,16) = A008598(n-16) for n > 15;
T(n,17) = A008599(n-17) for n>16; T(n,18) = A008600(n-18) for n > 17;
T(n,19) = A008601(n-19) for n>18; T(n,20) = A008602(n-20) for n > 19;
Row sums give A000292; triangle sums give A000332;
All numbers m > 0 occur A000005(m) times;
A002378(n) = T(A005408(n),n+1) = n*(n+1).
k-th columns are arithmetic progressions with step k, starting with 0. If a zero is prefixed to the sequence, then we get a new table where the columns are again arithmetic progressions with step k, but starting with k, k=0,1,2,...: 1st column = (0,0,0,...), 2nd column = (1,2,3,...), 3rd column = (2,4,6,8,...), etc. - M. F. Hasler, Feb 02 2013
Construct the infinite-dimensional matrix representation of angular momentum operators (J_1,J_2,J_3) in the Jordan-Schwinger form (cf. Harter, Klee, Schwinger). The triangle terms T(n,k) = T(2j,j+m) satisfy: (1/2)T(2j,j+m)^(1/2) = = = i = -i . Matrices for J_1 and J_2 are sparse. These equalities determine the only nonzero entries. - Bradley Klee, Jan 29 2016
T(n+1,k+1) is the number of degrees of freedom of a k-dimensional affine subspace within an n-dimensional vector space. This is most readily interpreted geometrically: e.g. in 3 dimensions a line (1-dimensional subspace) has T(4,2) = 4 degrees of freedom and a plane has T(4,3) = 3. T(n+1,1) = n indicates that points in n dimensions have n degrees of freedom. T(n,n) = 0 for any n as all n-dimensional spaces in an n-dimensional space are equivalent. - Daniel Leary, Apr 29 2020

Examples

			From _M. F. Hasler_, Feb 02 2013: (Start)
Triangle begins:
  0;
  1, 0;
  2, 2, 0;
  3, 4, 3, 0;
  4, 6, 6, 4, 0;
  5, 8, 9, 8, 5, 0;
  (...)
If an additional 0 was added at the beginning, this would become:
  0;
  0, 1;
  0, 2, 2;
  0, 3, 4; 3;
  0, 4, 6, 6, 4;
  0, 5, 8, 9, 8, 5;
  ... (End)
		

Crossrefs

J_3: A114327; J_1^2, J_2^2: A141387, A268759.
Cf. A000292 (row sums), A000332 (triangle sums).
T(n,k) for values of k:
A005843 (k=2), A008585 (k=3), A008586 (k=4), A008587 (k=5), A008588 (k=6), A008589 (k=7), A008590 (k=8), A008591 (k=9), A008592 (k=10), A008593 (k=11), A008594 (k=12), A008595 (k=13), A008596 (k=14), A008597 (k=15), A008598 (k=16), A008599 (k=17), A008600 (k=18), A008601 (k=19), A008602 (k=20).

Programs

  • Magma
    /* As triangle */ [[k*(n-k): k in [1..n]]: n in [1.. 15]]; // Vincenzo Librandi, Jan 30 2016
    
  • Mathematica
    Flatten[Table[(j - m) (j + m + 1), {j, 0, 10, 1/2}, {m, -j, j}]] (* Bradley Klee, Jan 29 2016 *)
  • PARI
    {for(n=1, 13, for(k=1, n, print1(k*(n - k)," ");); print(););} \\ Indranil Ghosh, Mar 12 2017

A144777 Integers having decimal digital mean equal to zero.

Original entry on oeis.org

18, 27, 36, 45, 54, 63, 72, 81, 90, 1089, 1098, 1179, 1188, 1197, 1269, 1278, 1287, 1296, 1359, 1368, 1377, 1386, 1395, 1449, 1458, 1467, 1476, 1485, 1494, 1539, 1548, 1557, 1566, 1575, 1584, 1593, 1629, 1638, 1647, 1656, 1665, 1674, 1683, 1692, 1719
Offset: 1

Views

Author

Reikku Kulon, Sep 21 2008

Keywords

Comments

Define the digital mean of n in base b, dm(b, n), to be (Sum_{i=1..d} 2*d_i - (b-1)) / (2*d), where d is the number of digits in the base b representation of n and d_i the individual digits.
a(n) is the subset of multiples of nine for which dm(10, n) = 0; that is, two times the sum of the digits is equal to nine times the number of digits.

Crossrefs

Programs

  • Mathematica
    Select[Range[200]*9, 2*DigitSum[#] == 9*IntegerLength[#] &] (* Paolo Xausa, May 17 2024 *)

A087411 Multiples of 9 with digits grouped in pairs and leading zeros omitted.

Original entry on oeis.org

91, 82, 73, 64, 55, 46, 37, 28, 19, 9, 91, 8, 11, 71, 26, 13, 51, 44, 15, 31, 62, 17, 11, 80, 18, 91, 98, 20, 72, 16, 22, 52, 34, 24, 32, 52, 26, 12, 70, 27, 92, 88, 29, 73, 6, 31, 53, 24, 33, 33, 42, 35, 13, 60, 36, 93, 78, 38, 73, 96, 40, 54, 14, 42, 34, 32, 44, 14, 50, 45, 94
Offset: 1

Views

Author

N. J. A. Sloane, Oct 19 2003

Keywords

Crossrefs

Programs

  • Mathematica
    FromDigits /@ Partition[ Flatten[ IntegerDigits[ Table[ 9n, {n, 1, 60}]]], 2] (* Robert G. Wilson v *)

Extensions

More terms from Ray Chandler, Oct 20 2003

A144798 Integers having ideal digital mean up to base 3.

Original entry on oeis.org

38, 42, 56, 139, 141, 147, 153, 169, 177, 195, 201, 225, 542, 558, 572, 598, 604, 654, 666, 678, 684, 779, 781, 803, 805, 835, 899, 905, 913, 929, 2079, 2107, 2109, 2266, 2390, 2396, 2410, 2418, 2424, 2474, 2482, 2506, 2508, 2536, 2606, 2614, 2638, 2650
Offset: 1

Views

Author

Reikku Kulon, Sep 21 2008

Keywords

Comments

Subset of A031443.
These numbers have digital mean dm(b, n) = (Sum_{i=1..d} 2*d_i - (b-1)) / (2*d) = 0, where d is the number of digits in the base b representation of n and d_i the individual digits, for 2 <= b <= 3.

Crossrefs

Extensions

Added accidentally omitted terms. - Reikku Kulon, Sep 24 2008

A225360 Partition numbers of the form 9k.

Original entry on oeis.org

135, 297, 792, 1575, 10143, 31185, 63261, 329931, 15796476, 44108109, 4835271870, 7346629512, 12292341831, 18440293320, 107438159466, 129913904637, 156919475295, 250438925115, 1527273599625, 3345365983698, 3646072432125, 7206841706490
Offset: 1

Views

Author

Omar E. Pol, May 05 2013

Keywords

Comments

Intersection of A008591 and A000041.

Examples

			135 is in the sequence because 9*15 = 135 and 135 is a partition number: p(14) = A000041(14) = 135.
		

Crossrefs

Programs

  • Mathematica
    Select[PartitionsP[Range[300]], Mod[#, 9] == 0 &]

Formula

a(n) = 9*A222179(n).

A274406 Numbers m such that 9 divides m*(m + 1).

Original entry on oeis.org

0, 8, 9, 17, 18, 26, 27, 35, 36, 44, 45, 53, 54, 62, 63, 71, 72, 80, 81, 89, 90, 98, 99, 107, 108, 116, 117, 125, 126, 134, 135, 143, 144, 152, 153, 161, 162, 170, 171, 179, 180, 188, 189, 197, 198, 206, 207, 215, 216, 224, 225, 233, 234, 242, 243, 251, 252, 260, 261, 269
Offset: 1

Views

Author

Bruno Berselli, Jun 20 2016

Keywords

Comments

Equivalently, numbers congruent to 0 or 8 mod 9.
Terms of A007494 with indices in A047264. Also, terms of A060464 with indices in A047335.

Crossrefs

Cf. A008591 (first bisection), A010689 (first differences), A017257 (second bisection).
Cf. similar sequences in which m*(m+1) is divisible by k: A014601 (k=4), A047208 (k=5), A007494 (k=3 and 6), A047335 (k=7), A047521 (k=8), this sequence (k=9).
Cf. A301451: numbers congruent to {1, 7} mod 9; A193910: numbers congruent to {2, 6} mod 9.

Programs

  • Magma
    [n: n in [0..300] | IsDivisibleBy(n*(n+1),9)];
  • Mathematica
    Select[Range[0, 300], Divisible[# (# + 1), 9] &]
  • PARI
    for(n=0, 300, if(n*(n+1)%9==0, print1(n", ")))
    
  • Sage
    [n for n in range(300) if 9.divides(n*(n+1))]
    

Formula

G.f.: x^2*(8 + x)/((1 + x)*(1 - x)^2).
a(n) = (18*n + 7*(-1)^n - 11)/4. Therefore: a(2*m) = 9*m-1, a(2*m+1) = 9*m. It follows that a(j)+a(k) and a(j)*a(k) belong to the sequence if j and k are not both even.
a(n) = -A090570(-n+2).
a(n) = a(n-1) + a(n-2) - a(n-3).
a(2*r+1) + a(2*r+s+1) = a(4*r+s+1) and a(2*r) + a(2*r+2*s+1) = a(4*r+2*s). A particular case provided by these identities: a(n) = a(n - 2*floor(n/6)) + a(2*floor(n/6) + 1).
E.g.f.: 1 + ((9*x - 2)*cosh(x) + 9*(x - 1)*sinh(x))/2. - Stefano Spezia, Apr 24 2021

A369659 Non-multiples of 3 whose arithmetic derivative, or equally, the sum of prime factors (with multiplicity) is a multiple of 3.

Original entry on oeis.org

1, 8, 14, 20, 26, 35, 38, 44, 50, 62, 64, 65, 68, 74, 77, 86, 92, 95, 110, 112, 116, 119, 122, 125, 134, 143, 146, 155, 158, 160, 161, 164, 170, 185, 188, 194, 196, 203, 206, 208, 209, 212, 215, 218, 221, 230, 236, 242, 254, 275, 278, 280, 284, 287, 290, 299, 302, 304, 305, 314, 323, 326, 329, 332, 335, 341, 343
Offset: 1

Views

Author

Antti Karttunen, Feb 10 2024

Keywords

Comments

This is a subsequence of A373475, containing all its terms that are not multiples of 3. (See comments in A373475 for a proof). The first difference from A373475 is at n=4186, where A373475(4186) = 19683 = 3^9, the value which is missing from this sequence. - Antti Karttunen, Jun 07 2024
From Antti Karttunen, Jun 11 2024: (Start)
A multiplicative semigroup: if m and n are in the sequence, then so is m*n.
Numbers that are not multiples of 3, and the multiplicities of prime factors of the forms 3m+1 (A002476) and 3m-1 (A003627) are equal modulo 3.
Like A373597, which is a subsequence, also this sequence can be viewed as a kind of k=3 variant of A046337.
A289142, numbers whose sum of prime factors (with multiplicity, A001414) is a multiple of 3, is generated (as a multiplicative semigroup) by the union of this sequence with {3}.
A327863, numbers whose arithmetic derivative is a multiple of 3, is generated by this sequence and A008591.
A373478, numbers that are in the intersection of A289142 and A327863, is generated by the union of this sequence with {9, 27}.
A373475, numbers that are in the intersection of A289142 and A369644 (positions of multiples of 3 in A083345), is generated by the union of this sequence with {19683}, where 19683 = 3^9.
(End)
The integers in the multiplicative subgroup of positive rationals generated by semiprimes of the form 3m+2 (A344872) and cubes of primes except 27. - Peter Munn, Jun 19 2024

Examples

			280 = 2*2*2*5*7 is included as it is not a multiple of 3, and one of its prime factors (7) is of the form 3m+1 and four are of the form 3m-1, and because 4 == 1 (mod 3). Also, A001414(280) = 18, and A003415(280) = 516, both of which are multiples of 3. - _Antti Karttunen_, Jun 12 2024
		

Crossrefs

Cf. A001414, A002476, A003415, A003627, A083345, A369658 (characteristic function).
Intersection of A001651 and A327863.
Intersection of A001651 and A373475.
Setwise difference A373475 \ A373476.
Subsequence of A369644, which is a subsequence of A327863, and also of the following sequences: A289142, A373475, A373478.
Includes A030078 \ {27}, A344872 and A373597 as subsequences.
Cf. also A046337, A360110, A369969 for cases k=2, 4, 5 of "Nonmultiples of k whose arithmetic derivative is a multiple of k".
Cf. also A374044.

Programs

Extensions

Name amended with an alternative definition by Antti Karttunen, Jun 11 2024

A085132 Multiples of 9 which are 7-smooth.

Original entry on oeis.org

9, 18, 27, 36, 45, 54, 63, 72, 81, 90, 108, 126, 135, 144, 162, 180, 189, 216, 225, 243, 252, 270, 288, 315, 324, 360, 378, 405, 432, 441, 450, 486, 504, 540, 567, 576, 630, 648, 675, 720, 729, 756, 810, 864, 882, 900, 945, 972, 1008, 1080, 1125, 1134, 1152
Offset: 1

Views

Author

Amarnath Murthy, Jul 06 2003

Keywords

Comments

Equivalently, multiples of 9 with the largest prime divisor < 10.

Crossrefs

Programs

  • Mathematica
    With[{p = Prime[Range[4]]}, 9 * Select[Range[140], Times @@ (p^IntegerExponent[#, p]) == # &]] (* Amiram Eldar, Sep 23 2024 *)

Formula

From Amiram Eldar, Sep 22 2024: (Start)
a(n) = 9*A002473(n).
Sum_{n>=1} 1/a(n) = 35/72. (End)

Extensions

More terms from David Wasserman, Jan 28 2005
Offset changed by Andrew Howroyd, Sep 19 2024

A144799 Integers having ideal digital mean up to base 4.

Original entry on oeis.org

141, 147, 153, 177, 195, 201, 225, 2079, 2109, 2418, 2424, 2508, 2652, 2868, 2892, 2898, 3102, 3126, 3150, 3228, 3282, 3288, 3300, 3312, 3342, 3354, 3366, 3378, 3384, 3426, 3462, 3468, 3474, 3504, 3522, 3528, 3696, 3792, 3846, 3852, 3864, 3912, 3936
Offset: 1

Views

Author

Reikku Kulon, Sep 21 2008

Keywords

Comments

Subset of A031443 and A144798.
These numbers have digital mean dm(b, n) = (Sum_{i=1..d} 2*d_i - (b-1)) / (2*d) = 0, where d is the number of digits in the base b representation of n and d_i the individual digits, for 2 <= b <= 4.

Crossrefs

Extensions

Added accidentally omitted terms. - Reikku Kulon, Sep 24 2008
Previous Showing 31-40 of 92 results. Next