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 51-60 of 61 results. Next

A334077 a(n) is the smallest positive integer that can be expressed as the difference of two positive triangular numbers in at least n ways.

Original entry on oeis.org

2, 5, 9, 27, 45, 63, 105, 135, 225, 315, 315, 315, 945, 945, 945, 945, 1575, 1575, 2835, 2835, 3465, 3465, 3465, 3465, 10395, 10395, 10395, 10395, 10395, 10395, 10395, 10395, 17325, 17325, 17325, 17325, 31185, 31185, 31185, 31185, 45045, 45045, 45045, 45045
Offset: 1

Views

Author

Ilya Gutkovskiy, Apr 13 2020

Keywords

Crossrefs

A334853 a(n) is the least number with exactly n odd divisors that are <= sqrt(n).

Original entry on oeis.org

1, 9, 30, 90, 225, 315, 630, 945, 1575, 2835, 4410, 3465, 8190, 6930, 14175, 10395, 27720, 17325, 35910, 31185, 66150, 62370, 99225, 45045, 198450, 90090, 121275, 103950, 207900, 155925, 415800, 135135, 311850, 368550, 353430, 225225, 1158300, 706860
Offset: 1

Views

Author

Ilya Gutkovskiy, May 13 2020

Keywords

Comments

Index of first occurrence of n in A069288.

Crossrefs

A348199 a(n) is the least term of A326835 whose number of divisors is n.

Original entry on oeis.org

1, 3, 9, 15, 81, 45, 729, 105, 225, 405, 59049, 495, 531441, 3645, 2025, 1155, 43046721, 3675, 387420489, 4455, 18225, 295245, 31381059609, 8085, 50625, 2657205, 65025, 40095, 22876792454961, 34425, 205891132094649, 19635, 1476225, 215233605, 455625, 62475
Offset: 1

Views

Author

Amiram Eldar, Oct 06 2021

Keywords

Comments

First differs from A038547 at n = 12.
All the terms are odd since all the terms of A326835 are odd (as phi(1) = phi(2) = 1).
a(n) exists for any n since 3^(n-1) is a term of A326835 which has n divisors.

Crossrefs

Programs

  • Mathematica
    seq[m_] := Module[{p = Select[Range[m], PrimeQ], s = Table[0, {m}], c, nd, ndd}, s[[p]] = 3^(p - 1); c = Length[p]; n = 1; While[c < m, nd = DivisorSigma[0, n]; If[nd <= m && s[[nd]] == 0, ndd = Length@Union[EulerPhi /@ Divisors[n]]; If[ndd == nd, c++; s[[nd]] = n]]; n++]; s]; seq[30]

Formula

a(n) <= 3^(n-1), with equality if n is prime.
a(n) >= A038547(n).

A361418 a(n) is the least number with exactly n noninfinitary divisors.

Original entry on oeis.org

1, 4, 12, 16, 60, 36, 48, 256, 360, 4096, 180, 144, 240, 576, 768, 65536, 2520, 1048576, 12288, 900, 1260, 1296, 720, 2304, 1680, 9216, 2880, 5184, 3840, 147456, 196608, 36864, 27720, 46656, 3145728, 4398046511104, 61440, 3600, 6300, 18014398509481984, 10080, 20736
Offset: 0

Views

Author

Amiram Eldar, Mar 11 2023

Keywords

Comments

a(n) is the least number k such that A348341(k) = n.
Since A348341(k) depends only on the prime signature of k, all the terms of this sequence are in A025487.

Examples

			a(1) = 4 since 4 is the least number with exactly one noninfinitary divisor, 2.
		

Crossrefs

Similar sequences: A005179 (all divisors), A038547 (odd divisors), A085629 (coreful divisors), A130279 (square), A187941 (even), A309181 (non-unitary), A340232 (bi-unitary), A340233 (exponential), A357450 (odd square), A358252 (non-unitary square).

Programs

  • Mathematica
    f[1] = 0; f[n_] := DivisorSigma[0, n] - Times @@ Flatten[2^DigitCount[#, 2, 1] & /@ FactorInteger[n][[;; , 2]]];
    seq[len_, nmax_] := Module[{s = Table[0, {len}], c = 0, n = 1, i}, While[c < len && n < nmax, i = f[n] + 1; If[i <= len && s[[i]] == 0, c++; s[[i]] = n]; n++]; s];
    seq[35, 10^7]
  • PARI
    s(n) = {my(f = factor(n)); numdiv(f) - prod(i = 1, #f~, 2^hammingweight(f[i,2]));}
    lista(len, nmax) = {my(v = vector(len), c = 0, n = 1, i); while(c < len && n < nmax, i = s(n) + 1; if(i <= len && v[i] == 0, c++; v[i] = n); n++); v};

A367370 a(k) is the number of different widths patterns in the symmetric representation of sigma for numbers having k odd divisors.

Original entry on oeis.org

1, 2, 3, 6, 5, 16, 7, 40
Offset: 1

Views

Author

Hartmut F. W. Hoft, Dec 05 2023

Keywords

Comments

The width pattern (A341969) of the symmetric representation of sigma for a number with k >= 1 odd divisors has length 2*k - 1.
a(p) = p for any prime number p is realized by the m+1 numbers 3^(p-1), ..., 2^m * 3^(p-1) which contain m+1-p duplicates, where m = floor(log_2(3^(p-1))). Each width pattern first increases to a level 1 <= i <= p and then alternates between i and i-1 up to the diagonal of the symmetric representation of sigma resulting in p distinct patterns.
For some numbers n = 2^m * q, q odd and not prime, that are the least instantiations of a width pattern their odd parts q may not be the least instantiations of a width pattern, examples are 78, 1014, 12246 and 171366 with 4, 6, 8 and 10 odd divisors, respectively (see row 2 of the table in A367377).
Conjecture: a(9) = 28.
The least number instantiating the 28th width pattern, 12345654345654321, is n = 43356672, found in a search up to 5*10^9.
Table of width pattern counts of the symmetric representation of sigma and of all possible symmetric patterns:
# odd divisors 1 2 3 4 5 6 7 8 9 10 11 12
pattern count 1 2 3 6 5 16 7 40 28? >=47 11 >=223
A001405 1 2 3 6 10 20 35 70 126 252 462 924
The 4 symmetric patterns 10123232101, 10123432101, 12101010121 and 12123432121 cannot be instantiated as width patterns of numbers with 6 odd divisors.
30 of the 70 possible symmetric patterns of numbers n = 2^m * q, m>=0 and q odd, with 8 odd divisors cannot be instantiated as width patterns of the symmetric representation of sigma(n) since their sequence of widths contradicts the order of the odd divisors d_i of n and of the numbers 2^(m+1) * d_i and the positions of their corresponding 1's in the rows of the triangle of widths in A249223.

Examples

			In the irregular triangle below, row k lists the count and the first occurrences of successive instantiations of the distinct width patterns in the symmetric representation of sigma for numbers with k odd divisors.
# div |count|    first occurrence of distinct width patterns
      |     |    1    2    3     4     5     6      7 .. 11 .. 16 .. 40
-----------------------------------------------------------------------
1     |  1  |    1                                        .     .     .
2     |  2  |    3    6                                   .     .     .
3     |  3  |    9   18   72                              .     .     .
4     |  6  |   15   21   30    60    78   120            .     .     .
5     |  5  |   81  162  648  1296  5184                  .     .     .
6     | 16  |   45   63   75    90   147   150    180    ...  27744   .
7     |  7  |  729 1458 5832 11664 46656 93312 373248     .           .
8     | 40  |  105  135  165   189   210   231    357    ...       203808
9     | 28? |  225  441  450   882   900  1225   1800    ...
10    | >=47|  405  567  810  1134  1377  1539   1620    ...
11    | 11  |59049                 ...               1934917632
The complete sequence of first occurrences of the 11 width patterns for numbers with 11 odd divisors is: 59049, 118098, 472392, 944784, 3779136, 7558272, 30233088, 120932352, 241864704, 967458816, 1934917632.
The column labeled '1' of least occurrences of a width pattern of length 2k-1 is sequence A038547: least number with exactly k odd divisors.
		

Crossrefs

Programs

  • Mathematica
    t249223[n_] := FoldList[#1+(-1)^(#2+1)KroneckerDelta[Mod[n-#2 (#2+1)/2, #2]]&, 1, Range[2, Floor[(Sqrt[8n+1]-1)/2]]]
    (* row n in triangle of A249223 *)
    t262045[n_] := Join[t249223[n], Reverse[t249223[n]]] (* row n in triangle of A262045 *)
    widthPattern[n_] := Map[First, Split[t262045[n]]]
    nOddDivs[n_] := Length[Divisors[NestWhile[#/2&, n, EvenQ[#]&]]]
    count[n_, k_] := Length[Union[Map[widthPattern, Select[Range[n], nOddDivs[#]==k&]]]]
    (* count of distinct width patterns for numbers with k odd divisors in the range 1 .. n *)

A368952 Irregular triangle T(n,k) read by rows: row n lists the larger number in each pair of triangular numbers (a, b) satisfying a - b = n.

Original entry on oeis.org

1, 3, 6, 3, 10, 15, 6, 21, 6, 28, 10, 36, 45, 15, 10, 55, 10, 66, 21, 78, 15, 91, 28, 105, 15, 120, 36, 21, 15, 136, 153, 45, 171, 28, 21, 190, 55, 210, 21, 231, 66, 36, 21, 253, 28, 276, 78, 300, 45, 325, 91, 28, 351, 36, 378, 105, 55, 28, 406, 28, 435, 120, 465, 66, 45, 36
Offset: 1

Views

Author

Hartmut F. W. Hoft, Jan 10 2024

Keywords

Comments

The length of row n in the triangle is A001227(n) and its first column T(n, 1) is ordered. Also, A001227(n) = number of 1s in row n of the triangle of A237048 = length of row n in the triangle of A280851. The records of row lengths in the triangle form sequence A038547.

Examples

			For n=3 with 0 <= k <= 6, sqrt((2*k + 1)^2 - 8*3) has integer values for k=2, 3, so that the pairs of triangular numbers are (3, 0) and (6, 3), and row 3 of the triangle consists of 6 and 3.
The first 20 rows of the irregular triangle:
   n| k:   1     2     3     4
  -----------------------------
   1|      1
   2|      3
   3|      6     3
   4|     10
   5|     15     6
   6|     21     6
   7|     28    10
   8|     36
   9|     45    15    10
  10|     55    10
  11|     66    21
  12|     78    15
  13|     91    28
  14|    105    15
  15|    120    36    21    15
  16|    136
  17|    153    45
  18|    171    28    21
  19|    190    55
  20|    210    21
  ...
		

Crossrefs

Programs

  • Mathematica
    a000217[k_] := k (k+1)/2
    triangle[n_] := Map[a000217, Select[Range[a000217[n], 0, -1], IntegerQ[Sqrt[(2#+1)^2 -8n]]&]]
    a368952[n_] := Flatten[Map[triangle, Range[n]]]
    a368952[30]

Formula

n = A000217(x) - A000217(y), x > y >= 0, precisely when sqrt( (2*x + 1)^2 - 8*n ) is an integer.

A384704 Triangle T(i, j), 1 <= j <= i, read by rows. T(i, j) is the smallest number k that has i odd divisors and whose symmetric representation of sigma, SRS(k), has j parts; when no such k exists then T(i, j) = -1.

Original entry on oeis.org

1, 6, 3, 18, -1, 9, 30, 78, 15, 21, 162, -1, -1, -1, 81, 90, 666, 45, 75, 63, 147, 1458, -1, -1, -1, -1, -1, 729, 210, 1830, 135, 105, 165, 189, 357, 903, 450, -1, 225, -1, 1225, -1, 441, -1, 3025, 810, 53622, 405, -1, 1377, 1875, 567, 1539, 4779, 6875, 118098, -1, -1, -1, -1, -1, -1, -1, -1, -1, 59049
Offset: 1

Views

Author

Hartmut F. W. Hoft, Jun 07 2025

Keywords

Comments

T(i, j) = -1 for i >= 1 odd, nonprime, j even with 1 < j < i; also for i prime and all j with 1 < j < i.
The single value T(10, 4) = -1 has been verified; see the conjecture below.
T(i, i) <= 3^(i-1) for all i >=1 . Equality holds for all primes i. T(i, i) = A318843(i), for all i >= 1.
A038547(i) is the smallest number with exactly i odd divisors. Thus odd number A038547(i) occurs in row i of triangle T(i, j) so that A038547 is a subsequence of this sequence. For i prime, A038547(i) = T(i, i). For 4 <= i <= 10^9 nonprime, A038547(i) is in the third column, T(i, 3), except for i=8; furthermore, the first part of SRS(A038547(i)) has width 1 and size (A038547(i)+1)/2.
T(i, 1) <= 2 * 3^(i-1) and it is even for all i >1. Equality holds for all primes i.
T(i, 2) <= 2 * 3^(i/2-1) * p for all even i where p is the smallest prime greater than 4 * 3^(i/2-1). Equality holds when i = 2 * h where h is prime.
The positive numbers in columns 1..6 are subsequences of A174973, A239929, A279102, A280107, A320066, A320511, respectively.
Conjectures:
All entries T(i, j) in columns j >= 3 are odd.
T(i, 1)/2 is odd for all i > 1.
T(i, 1) = 2 * T(i, 3) for all nonprime i > 3, for i = 3, but not for i = 8.
T(i, 2)/2 is odd for all even i > 2.
T(i, 3) = A038547(i) for all nonprime i > 3, except i = 8.
T(2*i, 2*j) = -1 for j >= 2 and all prime i satisfying i >= prime(j+1).
From Omar E. Pol, Jun 08 2025: (Start)
T(i,j) is also the smallest number k whose symmetric representation of sigma(k) has i subparts and j parts, or -1 if no such k exists.
Observations:
At least for i < 12 if i is prime then T(i,1) = 2*T(i,i).
At least for i < 12 if i is prime then all terms in row i are -1's except the first and the last term. (End)

Examples

			The first 12 rows of triangle T(i, j):
   i\j      1     2   3   4    5    6    7    8    9   10    11    12
   1:       1
   2:       6     3
   3:      18    -1   9
   4:      30    78  15  21
   5:     162    -1  -1  -1   81
   6:      90   666  45  75   63  147
   7:    1458    -1  -1  -1   -1   -1  729
   8:     210  1830 135 105  165  189  357  903
   9:     450    -1  25  -1 1225   -1  441   -1 3025
  10:     810 53622 405  -1 1377 1875  567 1539 4779 6875
  11:  118098    -1  -1  -1   -1   -1   -1   -1   -1   -1 59049
  12:     630 16290 315 495  525 1071 1287 1197 2499 6069 13915 29095
  ...
		

Crossrefs

Programs

  • Mathematica
    (* function partsSRS[ ] is defined in A377654 *)
    setupT[d_] := Module[{list=Table[0, {i, d}, {j, i}], s, t}, For[s=1, s<=d, s++, For[t=1, t<=s, t++, If[(OddQ[s]&&Not[PrimeQ[s]]&&EvenQ[t]&&1
    				

A305183 Least k such that A048272(k) = -n.

Original entry on oeis.org

2, 4, 8, 16, 24, 64, 48, 256, 96, 144, 192, 4096, 240, 16384, 768, 576, 480, 262144, 720, 1048576, 960, 2304, 12288, 16777216, 1440, 5184, 49152, 3600, 3840, 1073741824, 2880, 4294967296, 3360, 36864, 786432, 20736, 5040, 274877906944, 3145728, 147456, 6720, 4398046511104, 11520, 17592186044416
Offset: 0

Views

Author

Seiichi Manyama, May 26 2018

Keywords

Comments

All terms are even.

Crossrefs

Cf. A038547 (similar but with n instead of -n).

Programs

  • PARI
    a048272(n) = sumdiv(n, d, if (d%2, 1, -1));
    a(n) = {my(k=1); while (a048272(k) != -n, k++); k;} \\ Michel Marcus, May 27 2018

Formula

a(n) = 2 * A187941(n).
a(n) = 4 * A005179(n) for n > 0.

A316744 a(n) is the smallest number having exactly n ways to be represented as sum of at least two consecutive positive integers and expressible as sum of n consecutive positive integers, or 0 if no such number exists.

Original entry on oeis.org

9, 15, 162, 45, 729, 105, 900, 405, 9765625, 495, 1062882, 9477, 3969, 945, 344373768, 3825, 387420489, 7695, 34650, 413343, 81402749386839761113321, 7245, 202500, 732421875, 38025, 25515, 919973073089479921953602, 58725, 0, 29295, 23619600, 473513931, 60886809, 17325, 300189270593998242
Offset: 2

Views

Author

Jianing Song, Jul 13 2018

Keywords

Comments

a(n) is the smallest number such that A069283(n) == n*(n-1)/2 == A142150(n) (mod n). Or equivalently, a(n) is the smallest number of the form 2^t*s, where s is an odd number with exactly n + 1 divisors and divisible by A000265(n), t = 0 for odd n and A007814(n) - 1 for even n.
Let n = 2^e_0*Product_{i=1..m} p_i^e_i where p_i are odd primes; n + 1 = Product_{j=1..s} q_j where q_j are primes, then a(n) != 0 iff there is an injection f from {1,2,..,m} to {1,2,...,s} such that q_f(i) >= e_i + 1 for all 1 <= i <= m, implying s >= m. If such an injection does exist, then the number of k having exactly n ways to be represented as sum of at least two consecutive positive integers and expressible as sum of n consecutive positive integers is finite iff s = m, in which case the number of k is equal to the number of injections such that if i < j and e_i = e_j then q_f(i) <= q_f(j).
If A038547(n) is divisible by A000265(n), then a(n) = 2^t*A038547(n), t defined as above.
If n + 1 is a Fermat prime, then a(n) = (n/2)*3^n. If n = p - 1 = 2^e*q with p, q primes, then a(n) = 2^(e-1)*q^n, which is relatively large.

Examples

			a(2) = 9 = 4 + 5 = 2 + 3 + 4.
a(3) = 15 = 7 + 8 = 4 + 5 + 6 = 1 + 2 + 3 + 4 + 5.
a(4) = 162 = 53 + 54 + 55 = 39 + 40 + 41 + 42 = 14 + 15 + 16 + ... + 22 = 8 + 9 + 10 + ... + 19.
If a number k has exactly 30 ways to be represented as sum of at least two consecutive positive integers, then it must have exactly 31 odd divisors. On the other hand, the sum of 30 consecutive positive integers is congruent to 15 mod 30, so k must be of the form p^30 where p is an odd prime, which obviously cannot be divisible by 15. So a(30) = 0.
Let n = 225 = 3^2*5^2, n + 1 = 226 = 2*113, so e_1 = 2, e_2 = 2, q_1 = 2, q_2 = 113. An injection from {1,2} to {1,2} such that q_f(1) >= e_1 + 1 and q_f(2) >= e_2 + 1 does not exist, so a(225) = 0.
		

Crossrefs

A361615 a(n) is the smallest 5-rough number with exactly n divisors.

Original entry on oeis.org

1, 5, 25, 35, 625, 175, 15625, 385, 1225, 4375, 9765625, 1925, 244140625, 109375, 30625, 5005, 152587890625, 13475, 3814697265625, 48125, 765625, 68359375, 2384185791015625, 25025, 1500625, 1708984375, 148225, 1203125, 37252902984619140625, 336875, 931322574615478515625
Offset: 1

Views

Author

Jon E. Schoenfield, Mar 18 2023

Keywords

Examples

			a(1) = 1 (which is the only number with exactly 1 divisor).
a(2) = 5 (since 5 is the smallest prime that is 5-rough).
a(3) = 25 (since 5 is the smallest number that is the square of a 5-rough prime).
a(4) = 35 (since a number with 4 divisors must be either the cube of a prime or the product of two distinct primes, and the smallest 5-rough numbers of these two types are 5^3 = 125 and 5*7 = 35, respectively, and 35 is the smaller of the two).
		

Crossrefs

Previous Showing 51-60 of 61 results. Next