本网站由以下捐款支持：OEIS基金会.

用户：Enrique Pérez Herrero/OEIS软件包

来自OeisWiki
跳转到：航行,搜索

Mathematica OEIS包

当你继续计算时：如果你在做重复和无聊的事情，那是因为你没有以正确的方式工作。所以我决定写一些代码来帮助自己完成项目中最糟糕的部分。随着这段代码开始增长并变得越来越复杂，我们认为最好将所有代码集中在同一个Mathematica包中，并在互联网上共享。

如果您在档案中使用OEIS中的信息，此代码包含的功能可以使您的生活更轻松：用于文档或博客中的引用、用于编程序列或用于许多其他目的。


包装说明：

  • 版本:
    • V 1.0，2010年8月26日，测试。。。
    • V 2.0，2010年11月28日，旧链接不再有效。


  • 变化:
    • 2010年8月29日-添加OEISbFile函数并导出为HTML
    • 2010年11月28日-由于OEIS中的更改而重建代码，旧链接不再有效。
    • 2011年6月4日-修复了Unicode LF，而不是Window的bFiles CRLF。
    • 2015年1月25日-在GitHub创建存储库
  • 功能:
    • OEI序列总数
    • OEIS验证IDQ
    • OEI导入
    • OEISURL
    • OEIS功能
    • OEIS出口
    • OEISb文件

下载并安装OEIS。米

下载OEIS。米

  • 将包加载到Mathematica笔记本：
<<组织环境信息系统`

编程示例

从OEIS导入数据：

导入序列描述：

在[1]中：=OEISImport[“A014321号“，”描述“]Out[1]=连续奇数素数之间的下一个新间隔（除以2）。

导入序列数据：

在[2]中：=OEISImport[“A080321号“，”数据“]输出[2]={{0,0}，{1,4}，}2428}，｛358747}，｝41758473969}，｜5340760636747}，◄614410746502617904}，▄7673020037180959760871}，{8,1736622037158911219053381734718},{9,400539731185759177060380684246324}}

导入序列创建日期：

在[3]中：=OEISImport[“A117321号“，”日期“]退出[3]={2006年3月7日}

导入序列作者：

在[4]中：=OEISImport[“A014321号“，”作者“]输出[4]={Hynek Mlcousek}

导入图像：

在[5]中：=OEISImport[“A030337美元“，”图像“]输出[5]=

A030337-图像样本.gif的样本

导入bFile：

在[6]中：=ListPlot[OEISImport[“A094358号“，”bFile“]，Joined->True]输出[6]=（绘制图像）

导入可用数据范围：

在[7]中：=OEISImport[“A094358号“，”MinData“]输出[7]=1在[8]中：=OEISImport[“A094358号“，”MaxData“]输出[8]=1314


从OEIS导出数据：

  • 导出格式：
OEIS.m导出格式
文件扩展名 导出的数据：
*.gp（加仑） 添加PARI/GP函数帮助的代码
*.米 添加Mathematica帮助的代码
*.txt、*.xls、*.csv、*.tsv、*.dat 具有序列值的数据文件。
*.jpg、*.jpeg、*.jp2、*.j2k、*.bmp、*.pgn、*.gif、*.tiff、*.tif 图像绘图
*.围嘴 BibTeX引用OEIS序列
*.htm、*.html HTML引用OEIS序列

导出BibTeX引文：

函数的输入可以是字符串或字符串列表：

在[1]中：=OEISExport[｛”A026588号", "A111084号“}，”example.bib“]输出[1]=example.bi

文件内容：示例.bib 

@其他{oeisA026588，作者={}，TITLE={{O} n个-{五十} 行 {E} 百科全书第页，共页{一} 集成器 {S} 顺序},HOWPUBLISHED={\ href{http://oeis.org/A026588}{A026588}},月={}，年={}，注={的副本A026572号.}}@其他{oeisA111084，作者={N.J.A.Sloane}，TITLE={{O} n个-{五十} 行 {E} 百科全书第页，共页{一} 集成器 {S} 顺序},HOWPUBLISHED={\ href{http://oeis.org/A111084}{A111084}},月={11月}，年份={2005}，注意={记录发生在A111267号.}}

导出PARI/GP的帮助代码：

在[2]中：=OEISExport[｛”A026588号","A111084号","A131473号“}，”用于_PARIGP.gp的代码“]输出[2]=PARIGP.gp的代码
  • 文件内容：ARIGP.gp代码
添加帮助(A026588号,"A026588号：的副本A026572号。”）；添加帮助(A111084号,"A111084号：记录发生在何处A111267号.");添加帮助(A131473号,"A131473号：a（n）=n^6-n“）；

导出Mathematica的帮助代码：

在[3]中：=OEISExport[{“A026588号","A111084号","A131473号“}，”Mathematica.m的代码]输出[3]=Mathematica的代码。米
  • 文件内容：Mathematica代码。米
A026588号：：usage=“A026588号[n] ：的副本A026572号.";A111084号：：usage=“A111084号[n] ：记录出现在A111267号.";A131473号：：用法=“A131473号[n] ：a（n）=n^6-n“；

导出所有可用数据

  • EXCEL示例：
在[4]中：=OEISExport[｛”A026588号","A111084号","A131473号“}，”data.xls“]输出[4]={A026588_data.xls，A111084_data.x2ls，A131473_data.x1ls}

将引文导出为HTML代码

在[5]中：=OEISExport[{“A040414级", "A050414号", "A002323号", "A026588号“}，”test.html“]输出[5]=test.html
  • 文件内容：测试.html
<a name=“oeisA040414”>[1]-</a>N.J.a.Sloane，整数序列在线百科全书。<a href=http://oeis.org/A040414">A040414号</a>：sqrt的连续分数（435）。
<a name=“oeisA050414”>[2]-</a>Jud McCranie，整数序列在线百科全书。<a href=http://oeis.org/A050414">A050414号</a>：数字n，使2^n-3为素数。
<a name=“oeisA002323”>[3]-</a>N.J.a.Sloane，整数序列在线百科全书。<a href=http://oeis.org/A002323">A002323号费马剩余物。
<a name=“oeisA026588”>[4]-</a>整数序列在线百科全书。<a href=http://oeis.org/A026588">A026588号</a>：的副本A026572号.


将引文导出到Wiki代码

在[6]中：=OEISExport[｛”A026518号", "A111284号“}，”example.wiki“]输出[6]：=example.wiki
  • 文件内容：示例.wiki
*A026518号：a（n）=第n行相同符号的长度A026517美元.*A111284号：避免模式的排列数{2143234124132431314232413412342141234213423143141324312}；基于2143的强排序类数。

自动创建的功能：功能：OEIS功能[ID，选项]：

选项Opts在默认情况下都是True，可以修改为：

要跳过向函数添加帮助：

OEIS函数[ID，AddHelp->False]

要跳过bFile中的数据：

OEIS函数[ID，bFile->False]

不在屏幕上打印输出的信息：

OEIS函数[ID，输出->False]
  • 使用示例：
在[5]中：=OEISFunction[“A094358号"]A094358号（n） ：费马数因子的无平方积(A023394号).链接1：http://oeis.org/A094358链接2：http://oeis.org/b094358.txt添加的帮助：True从bFile加载的数据：True已从序列加载数据：False可用数据：n表，A094358号（n） 对于n=1..1314

从现在起，我们可以使用已加载所有数据的函数：

在[6]中：=A094358号[1314] 输出[6]=2917004348489729

生成b文件：

函数：OEISbFile[ID，Vmax，filename]


  • 例子：

我们可以先定义函数，但如果我们不定义它，代码会创建函数并从OEIS预加载所有可用数据：

在[5]中：=A040414号[0]:=20;A040414号[n]：=部分[{1,5,1,40}，1+Mod[n-1,4}}；在[6]中：=OEISb文件[“A040414号", 200]输出[6]=b040414.txt

链接：

检索自“https://oeis.org/w/index.php？title=用户：Enrique_Pérez_Herrero/OEIS_Package&oldid=1592194"