%I#11 2021年3月23日15:42:28

%S 77311293137325135933797754178532316723557237192374323773，

%电话：239713197331913333137769338633730737573376913799739733，

%电话：39929477975310161367349670971129711714437171973181

%N家常菜为5的家常菜。

%C术语数量<10^n:0，0，1，8，44，417，3299。

%e仅限（10、25、55、511、773）->773等。

%t lst={}；f[n_]：=FromDigits@Flatten[IntegerDigits@表格[#[[1]]，{#[2]]}]&/@因子整数@n, 2]; h[n_]：=嵌套WhileList[f@#&，n，！PrimeQ@#&、1、28]；做[p=h[n][[-1]]；如果[底漆Q@p&&p<10^7&&p！=n、 打印[｛n，p｝]；附加到[lst，p]]，{n，2，1000}]；

%t d=5-2；lsu={}；做[If[lst[[n]]==lst[n+d]]&&lst[[2n-1]]！=lst[[n]]&&lst[[n]]！=lst[[n+d+1]]，附加到[lsu，lst[n]]]，{n，188004-d-1}]；拿下[Union@lsu，45]

%Y参见A037274、A118756、A133963、A133956、A13395、A13398、A133960、A13396、A133996、A133.968、A133970、A13397、A13394、A1339.76、A133988。

%K nonn，基础

%O 1,1号机组

%A _Robert G.Wilson v_，2007年9月30日