login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A334217 Irregular table T(n, k) read by rows, n > 0 and k = 1..A334216(n); n-th row corresponds to distinct terms of n-th row of A334215, in ascending order. 1
1, 1, 2, 1, 3, 1, 2, 4, 1, 5, 1, 6, 1, 7, 1, 2, 8, 1, 3, 9, 1, 10, 1, 11, 1, 2, 12, 1, 13, 1, 14, 1, 15, 1, 2, 4, 16, 1, 17, 1, 3, 18, 1, 19, 1, 2, 20, 1, 21, 1, 22, 1, 23, 1, 2, 24, 1, 5, 25, 1, 26, 1, 3, 27, 1, 2, 28, 1, 29, 1, 30, 1, 31, 1, 2, 4, 32, 1, 33 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

LINKS

Table of n, a(n) for n=1..79.

FORMULA

T(n, 1) = 1.

T(n, 2) = A261969(n) for any n > 1.

T(n, A334216(n)-1) = A000188(n) for any n > 1.

T(n, A334216(n)) = n.

EXAMPLE

The first rows are:

  n     n-th row

  --    -------------

   1    [1]

   2    [1, 2]

   3    [1, 3]

   4    [1, 2, 4]

   5    [1, 5]

   6    [1, 6]

   7    [1, 7]

   8    [1, 2, 8]

   9    [1, 3, 9]

  10    [1, 10]

  11    [1, 11]

  12    [1, 2, 12]

  13    [1, 13]

  14    [1, 14]

  15    [1, 15]

  16    [1, 2, 4, 16]

PROG

(PARI) row(n) = { my (f=factor(n)); Set(apply (k -> prod (i=1, #f~, f[i, 1]^(f[i, 2]\k)), [1..1+if (n==1, 0, vecmax(f[, 2]~))])) }

CROSSREFS

Cf. A000188, A261969, A334215, A334216.

Sequence in context: A275280 A319845 A319847 * A334431 A087295 A175344

Adjacent sequences:  A334214 A334215 A334216 * A334218 A334219 A334220

KEYWORD

nonn,tabf

AUTHOR

Rémy Sigrist, Apr 19 2020

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 26 17:22 EST 2021. Contains 341632 sequences. (Running on oeis4.)