cp's OEIS Frontend

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.

A381960 Centered heptagonal numbers which are semiprime.

This page as a plain text file.
%I A381960 #9 Mar 18 2025 15:56:11
%S A381960 22,106,253,386,841,1198,1618,2101,2458,3046,3473,4166,4411,5461,6623,
%T A381960 6931,7246,7897,8926,9647,10018,12811,13238,14113,15947,16423,17893,
%U A381960 19951,22121,22681,24403,24991,26797,27413,30598,31921,32593,33958,38221,40447,41966,43513
%N A381960 Centered heptagonal numbers which are semiprime.
%e A381960 A069099(3) = 22 = 21*(3-1)/2 + 1 = 2*11.
%e A381960 A069099(6) = 106 = 42*(6-1)/2 + 1 = 2*53.
%e A381960 A069099(9) = 253 = 63*(9-1)/2 + 1 = 11*23.
%t A381960 Select[Table[(7*n^2 - 7*n + 2)/2, {n, 1, 120}], PrimeOmega[#] == 2 &] (* _Amiram Eldar_, Mar 11 2025 *)
%o A381960 (PARI) select(x->bigomega(x)==2, vector(120, n, (7*n^2-7*n+2)/2)) \\ _Michel Marcus_, Mar 11 2025
%Y A381960 Intersection of A069099 and A001358.
%Y A381960 Cf. A360183.
%K A381960 nonn
%O A381960 1,1
%A A381960 _Massimo Kofler_, Mar 11 2025