login
A077558
Triangle in which the n-th row contains n numbers beginning with n that have the same prime signature as n.
3
1, 2, 3, 3, 5, 7, 4, 9, 25, 49, 5, 7, 11, 13, 17, 6, 10, 14, 15, 21, 22, 7, 11, 13, 17, 19, 23, 29, 8, 27, 125, 343, 1331, 2197, 4913, 6859, 9, 25, 49, 121, 169, 289, 361, 529, 841, 10, 14, 15, 21, 22, 26, 33, 34, 35, 38, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 12, 18, 20
OFFSET
1,2
EXAMPLE
1; 2,3; 3,5,7; 4,9,25,49; 5,7,11,13,17; 6,10,14,15,21,22; ...
PROG
(Haskell)
import Data.List (genericTake)
a077558 n k = a077558_row n !! (k-1)
a077558_row n = n : genericTake (n - 1)
(filter ((== a046523 n) . a046523) [n + 1 ..])
a077558_tabf = map a077558_row [1..]
-- Reinhard Zumkeller, Jun 05 2013
CROSSREFS
Cf. A077559.
Cf. A046523.
Sequence in context: A081493 A144680 A209702 * A122444 A373751 A066072
KEYWORD
nonn,tabl
AUTHOR
Amarnath Murthy, Nov 10 2002
EXTENSIONS
Corrected by Al Arnold, Jul 04, 2003
More terms from Ray Chandler, Jul 17 2003
STATUS
approved