今天学习一下Mathematica里面输入列表的方法，可以帮助我们便捷地给出数组列表，并加以操作。
工具/原料
电脑
Mathematica
方法/步骤
1、用Range给出列表{1,2,3,4}:Range[4]
2、给出前100个正整数的列表：Range[100]
3、给出列表{4,3,2,1}:Reverse@Range@4
4、给出前50个正整数的倒序排列：Reverse@Range@50
5、给出列表{1,2,3,4,4,3,2,1}:x=Range@4Join[x,Reverse@x]
6、绘制散点图：正整数从1增加到100，再减到1.x=Range@100;ListPlot[Join[x,Reverse@x]]
7、给出20个不大于10的随机正整数的列表：RandomInteger[{1,10},20]
8、用简单的方法求代码Reverse[Reverse[Range[10]]]的运行结果：Range[10]
9、用简单的方法求代码Join[{1,2},Join[{3,4},{5}]]的运行结果：Range[5]
10、给出Join[Range[10],Join[Ra艘绒庳焰nge[10],Range[5]]]的运行结果：x=Range[10];y=Range[5];Join[x,x,y]
11、Reverse[Join[Range[20],Reverse[Ran壹执慵驾ge[20]]]]运行结果：Join[Range[20],Reverse[Range[20]]]
12、给出列表{1,2,3,4,5,4,3,咯悝滩镞2,1}：Join[Range[5],Reverse@Range[4]]或者Join[Range@4,Reverse@Range@5]
13、给出列表{3,2,1,4,3,2,1,咯悝滩镞5,4,3,2,1}：Join[Flatten@Table[Reverse@Range[n],{n,{3,4,5}}]]
