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 A045959 #17 Mar 20 2024 05:14:31
%S A045959 4,6,12,18,20,42,44,54,68,84,90,98,102,108,114,132,138,140,150,164,
%T A045959 182,198,212,228,230,234,278,282,308,314,332,354,374,390,420,434,458,
%U A045959 522,524,548,570,578,588,602,614,642,644,660,674,684,710,740,822,882,884,938,954
%N A045959 Numbers k in A045954 such that k-1 is prime.
%H A045959 Amiram Eldar, <a href="/A045959/b045959.txt">Table of n, a(n) for n = 1..10000</a>
%t A045959 seq[max_] := Module[{lst = Range[2, max, 2], i = 2, len}, While[i <= (len = Length@lst) && (k = lst[[i]]) <= len, lst = Drop[lst, {k, len, k}]; i++]; Select[lst, PrimeQ[# - 1] &]]; seq[1000] (* _Amiram Eldar_, Mar 20 2024, after _Robert G. Wilson v_ at A045954 *)
%Y A045959 Cf. A045954, A045958.
%Y A045959 Subsequence of A008864.
%K A045959 nonn
%O A045959 1,1
%A A045959 _Felice Russo_
%E A045959 Title corrected by _Sean A. Irvine_, Mar 29 2021