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.
%I A091455 #4 Mar 30 2012 17:30:57
%S A091455 30,42,66,78,102,114,138,174,186,222,246,258,282,318,354,366,402,426,
%T A091455 438,474,498,534,582,606,618,642,654,678,762,770,786,822,834,894,906,
%U A091455 910,942,978,1002,1038,1074,1086,1146,1158,1182,1190,1194,1266,1330
%N A091455 Integers n such that 3*phi(n) < n that are not multiples of smaller integers with this property.
%t A091455 a = {}; Do[ ep = EulerPhi[n]; If[ 3ep < n && Union[ Map[ IntegerQ, n/a]] != {False, True}, AppendTo[a, n]; Print[n]], {n, 1, 1361}]
%Y A091455 Cf. A091454.
%K A091455 nonn
%O A091455 1,1
%A A091455 _Robert G. Wilson v_, Jan 10 2004