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 A095136 #4 Jan 01 2024 18:38:18
%S A095136 1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,3,1,2,3,2,2,1,2,2,3,1,3,2,1,2,2,4,1,3,
%T A095136 4,3,1,2,3,4,4,2,3,4,3,3,4,3,5,3,6,3,5,4,3,4,2,1,2,3,2,3,2,5,5,4,3,4,
%U A095136 6,5,2,5,3,4,1,4,2,2,3,4
%N A095136 Number of distinct prime factors of A095134(n).
%F A095136 a(n) = A001221(A095134(n)). - _Wesley Ivan Hurt_, Jan 01 2024
%t A095136 PrimeFactors[n_] := Flatten[ Table[ #[[1]], {1} ] & /@ FactorInteger[n]]; f[n_] := Product[ Prime[i], {i, 2, n, 2}] + Product[ Prime[i], {i, 1, n, 2}]; f[1] = 2; Table[ Length[ PrimeFactors[ f[n]]], {n, 80}]
%Y A095136 Cf. A001221, A095134.
%K A095136 nonn
%O A095136 1,12
%A A095136 _Robert G. Wilson v_, May 27 2004