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 A140214 #13 Jan 07 2021 01:17:53 %S A140214 1,1,1,1,5,1,1,1,1,5,11,1,1,1,5,1,17,1,1,5,1,11,23,1,5,1,1,1,29,5,1,1, %T A140214 11,17,175,1,1,1,1,5,41,1,1,11,5,23,47,1,1,5,17,1,53,1,55,1,1,29,59,5, %U A140214 1,1,1,1,325,11,1,17,23,175,71,1,1,1,5,1,847,1,1,5,1,41,83,1,85,1,29,11 %N A140214 a(n) = Product_{h == 5 (mod 6) and h|n} h. %C A140214 Not multiplicative: a(5)*a(7) <> a(35). - _R. J. Mathar_, Oct 08 2011 %p A140214 A140214 := proc(n) a := 1 ; for h in numtheory[divisors](n) do if (h mod 6) = 5 then a := a*h: fi; od: a; end: %p A140214 seq(A140214(n),n=1..120) ; # _R. J. Mathar_, Jun 24 2009 %K A140214 nonn,easy %O A140214 1,5 %A A140214 _R. J. Mathar_, Jun 27 2008