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 A045963 #22 Mar 20 2024 05:15:08
%S A045963 2,4,6,10,12,22,34,36,42,52,54,70,76,84,90,100,114,132,234,244,246,
%T A045963 262,282,300,310,324,346,372,394,406,420,442,474,516,532,546,586,630,
%U A045963 642,646,660,684,714,724,742,772,780,790,804,874,906,916,954,966,994,1002,1044
%N A045963 Numbers k in A045954 such that 2*k-1 is prime.
%H A045963 Amiram Eldar, <a href="/A045963/b045963.txt">Table of n, a(n) for n = 1..10000</a>
%t A045963 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[2*# - 1] &]]; seq[1000] (* _Amiram Eldar_, Mar 20 2024, after _Robert G. Wilson v_ at A045954 *)
%Y A045963 Cf. A045954, A045962.
%Y A045963 Subsequence of A006254.
%K A045963 nonn
%O A045963 1,1
%A A045963 _Felice Russo_
%E A045963 More terms from _David W. Wilson_
%E A045963 Title corrected by _Sean A. Irvine_, Mar 29 2021