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 A063145 #3 Mar 30 2012 17:30:32 %S A063145 407,1189,1343,1681,7597,8791,10579,16147,23479,24341,25751,26101, %T A063145 28757,34093,36349,39961,47053,47669,52891,58879,62263,64277,79223, %U A063145 88183,93829,96029,98261 %N A063145 Composite numbers not divisible by 2 which in base 4 contain their largest proper factor as a substring. %t A063145 Do[ If[ !PrimeQ[ n ] && StringPosition[ ToString[ FromDigits[ IntegerDigits[ n, 4 ] ] ], ToString[ FromDigits[ IntegerDigits[ Divisors[ n ][ [ -2 ] ], 4 ] ] ] ] != {}, Print[ n ] ], {n, 3, 10^5, 2} ] %Y A063145 Cf. A062238. %K A063145 base,nonn %O A063145 1,1 %A A063145 _Robert G. Wilson v_, Aug 08 2001