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 A355014 #10 Jun 19 2022 02:21:11
%S A355014 1,3,2,5,4,6,8,11,7,14,12,17,10,19,21,9,24,18,25,13,28,29,30,34,15,36,
%T A355014 39,41,43,44,27,45,48,38,16,53,54,55,22,57,49,51,52,33,71,76,77,60,63,
%U A355014 64,65,67,23,68,70,88,20,89,90,72,75,96,97,98,42,79,80,81
%N A355014 Index of A355012(n) in A246547.
%H A355014 Michael De Vlieger, <a href="/A355014/b355014.txt">Table of n, a(n) for n = 1..1009</a>
%t A355014 With[{s = Map[ToExpression@ StringSplit[#][[-1]] &, Import["https://oeis.org/A246547/b246547.txt", "Data"][[2 ;; -1]]]}, Map[FirstPosition[s, #][[1]] &, Select[Import["https://oeis.org/A090252/b090252.txt", "Data"][[1 ;; 8000, -1]], CompositeQ[#] && PrimePowerQ[#] &] ]]
%Y A355014 Cf. A090252, A246547, A355012, A355013.
%K A355014 nonn
%O A355014 1,2
%A A355014 _Michael De Vlieger_, Jun 15 2022