OFFSET
2,2
COMMENTS
LINKS
Alois P. Heinz, Rows n = 2..1600, flattened
Omar E. Pol, Illustration of divisors of n
Wikipedia, Table of divisors
EXAMPLE
Written as a triangle:
1,
2,
1, 2,
4,
1, 1, 3,
6,
1, 2, 4,
2, 6,
1, 3, 5,
10,
1, 1, 1, 2, 6
MATHEMATICA
Flatten[Table[Differences[Divisors[n]], {n, 2, 30}]] (* T. D. Noe, Aug 31 2011 *)
PROG
(Haskell)
import Data.List (genericIndex)
a193829 n k = genericIndex a193829_tabf (n - 1) !! (k - 1)
a193829_row n = genericIndex a193829_tabf (n - 1)
a193829_tabf = zipWith (zipWith (-))
(map tail a027750_tabf') a027750_tabf'
-- Reinhard Zumkeller, Jun 25 2015, Jun 23 2013
CROSSREFS
KEYWORD
nonn,tabf,easy
AUTHOR
Omar E. Pol, Aug 31 2011
STATUS
approved