%I#13 2012年3月30日17:31:31
%S 4,14,15,21,22,35,38,55,57,74,87,95119143145166187205215217,
%电话:247253254259278287289291305314335339341394407427,
%电话:471493505514515517538553559565589614622623629633634649
%N个具有半素数“看和说”描述的半素数。
%C半素数类似于A056815。
%e14在序列中,因为14是一个半素数(2*7),它的“看和说”,1114也是一个半素(2*557)。
%t LookAndSayA[n_]:=FromDigits@Flatten@IntegerDigits@扁平[Through[{Length,First}[#]]&/@Split@Integer Digits@@n];semiPrimeQ[n_]:=Plus@@Last/@FactorInteger@n==2;选择[Range@650,semiPrimeQ@#&&semiPrimQ@LookAndSayA@#&]
%Y参考A001358、A056815。
%K容易,不是
%O 1,1号机组
%A _Robert G.Wilson v_,2012年1月27日
|