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.

A328834 Square root of the prime factor form (A276086) of the primorial base expansion, computed for such numbers for which it is a square.

This page as a plain text file.
%I A328834 #11 Nov 01 2019 18:39:33
%S A328834 1,3,5,15,25,75,7,21,35,105,175,525,49,147,245,735,1225,3675,343,1029,
%T A328834 1715,5145,8575,25725,11,33,55,165,275,825,77,231,385,1155,1925,5775,
%U A328834 539,1617,2695,8085,13475,40425,3773,11319,18865,56595,94325,282975,121,363,605,1815,3025,9075,847,2541,4235,12705,21175,63525,5929,17787
%N A328834 Square root of the prime factor form (A276086) of the primorial base expansion, computed for such numbers for which it is a square.
%C A328834 All terms are odd.
%H A328834 Antti Karttunen, <a href="/A328834/b328834.txt">Table of n, a(n) for n = 1..9072</a>
%H A328834 <a href="/index/Pri#primorialbase">Index entries for sequences related to primorial base</a>
%F A328834 a(n) = A276086(A328770(n)) = A000196(A276086(A328849(n))).
%t A328834 With[{b = MixedRadix[Reverse@ Prime@ Range@ 20]}, Select[Array[Sqrt@ Function[k, Times @@ Power @@@ # &@ Transpose@ {Prime@ Range@ Length@ k, Reverse@ k}]@ IntegerDigits[#, b] &, 10^3, 0], IntegerQ]] (* _Michael De Vlieger_, Oct 30 2019 *)
%Y A328834 Cf. A000196, A276086, A328849, A328770.
%K A328834 nonn
%O A328834 1,2
%A A328834 _Antti Karttunen_, Oct 30 2019