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 A069348 #16 Feb 23 2024 08:23:47
%S A069348 3,11,17,23,31,37,41,47,53,59,67,71,73,79,89,97,101,113,127,131,139,
%T A069348 151,157,163,167,173,179,181,191,193,199,211,223,229,233,239,241,251,
%U A069348 257,269,271,277,293,307,311,313,317,331,337
%N A069348 Primes of the form k + Omega(k), where Omega(k) is the number of prime factors of k, A001222(k).
%C A069348 The representation is ambiguous, see A069349.
%H A069348 Charles R Greathouse IV, <a href="/A069348/b069348.txt">Table of n, a(n) for n = 1..10000</a>
%e A069348 a(10) = 59 = A064800(57) = 57 + 2 (as 57 = 3*19).
%t A069348 Select[Table[n + PrimeOmega[n], {n, 1, 400}], PrimeQ] // Union (* _Jean-François Alcover_, Jun 08 2013 *)
%o A069348 (PARI) is(n)=for(k=1,log(n+.5)\log(2),if(bigomega(n-k)==k,return(isprime(n)))); 0 \\ _Charles R Greathouse IV_, Dec 10 2013
%Y A069348 Cf. A069346, A069357.
%K A069348 nonn
%O A069348 1,1
%A A069348 _Reinhard Zumkeller_, Mar 18 2002
%E A069348 Corrected by _T. D. Noe_, Nov 01 2006