|
|
|
|
|
|
|
|
|
#15通过N.J.A.斯隆2019年5月23日星期四08:30:10 EDT |
|
|
|
|
|
|
|
#14通过N.J.A.斯隆2019年5月23日星期四08:30:08 EDT |
|
|
|
|
|
|
|
#13通过布鲁诺·贝塞利美国东部时间2017年5月12日星期五05:42:10 |
|
|
|
|
|
|
|
#12通过Jean-François Alcover公司美国东部时间2017年5月12日星期五05:16:17 |
|
|
|
|
|
|
|
#11通过Jean-François Alcover公司2017年5月12日星期五05:15:27 EDT |
|
| 数学
|
表[an=a[n]；打印[“a（”，n，“）=”，an]；安，{n，1800}]}] (* _牛仔-弗兰ç操作系统 阿尔科弗_,五月 12 2017*)
|
|
|
|
|
讨论
|
| 5月12日星期五
| 05:16
| Jean-François Alcover公司：根据800个b文件条款检查更新的Mma代码。
|
|
|
|
|
|
|
#10通过Jean-François Alcover公司2017年5月12日星期五05:14:15 EDT |
|
| 数学
|
$MaxExtraPrecision=100；
r[数字]_,c（c）_]：=减少[k>>1&&j>>1&&n*（k^2--1)+) +1==j^2，{j，k}，整数]/。如果[n个<=三,C类[1] ->2,C[1]->1] //c（c）//简化；
a[n_]：=如果[尼泊尔=第页[n个,0] ||第页[n个,1] ||r[数字]] ===,2];rn公司===错误，0，k/。{到规则[第页[n个]]} //尼泊尔]} //最小值]；
表[an=a[n]；打印[“a（”，n，“）=”，an]；一个，{n，1，200}] (* _牛仔-弗兰ç操作系统 阿尔科弗_,五月 12 2017*)800}]
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#9通过布鲁诺·贝塞利美国东部时间2017年5月12日星期五03:12:38 |
|
|
|
|
|
|
|
#8通过Jean-François Alcover公司2017年5月12日星期五02:39:44 EDT |
|
|
|
|
|
|
|
#7通过Jean-François Alcover公司2017年5月12日星期五02:39:25 EDT |
|
| 数学
|
r[n_]：=减少[k>>1&&j>>1&&n*（k^2--1) +)+1==j^2，{j，k},},整数] /.如果[n个<=三,C类[1] ->2,C类[1] ->1] //简化;
整数]/。如果[n<=3，C[1]->2，C[1]->1]//简化；
表[an=a[n]；打印[“a（”，n，“）=”，an]；安，{n，1200}]}] (* _牛仔-弗兰ç操作系统 阿尔科弗_,五月 12 2017*)
|
|
|
|
|
|
|
#6通过Jean-François Alcover公司2017年5月12日星期五02:37:14 EDT |
|
| 数学
|
r[n]：=减少[k>1&&j>1&&n*（k^2-1）+1==j^2，{j，k}，
整数]/。如果[n<=3，C[1]->2，C[1]->1]//简化；
a[n_]：=如果[r[n]===假，0，k/。{ToRules[r[n]]}//Min]；
表[an=a[n]；打印[“a（”，n，“）=“，an]；安，{n，1200}]
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
