A274348 - OEIS

%I #7 Apr 11 2026 12:13:10

%S 84,132,216,231,308,348,378,504,564,594,609,792,812,912,957,987,1276,

%T 1316,1386,1476,1551,1566,1596,2068,2088,2128,2233,2388,2508,2538,

%U 2583,3344,3384,3444,3619,3654,3864,4059,4089,4104,4179,5412,5452,5472,5572,5742

%N Products of three distinct Lucas numbers (3,4,7,11,18,...)

%e 84 = 3*4*7, 132 = 3*4*11.

%t z = 100; f[n_] := LucasL[n];

%t Take[Sort[Flatten[Table[f[u] f[v] f[w], {u, 2, z}, {v, 2, u - 1}, {w, 2, v - 1}]]], z]

%t Take[Times@@@Subsets[LucasL[Range[2,20]],{3}]//Union,50] (* _Harvey P. Dale_, Apr 11 2026 *)

%Y Cf. A000032, A274349, A274348, A271354, A272949.

%K nonn,easy

%O 1,1

%A _Clark Kimberling_, Jun 18 2016