怎么操作Mathematica的数组列表

1、用Range给出列表 {1, 2, 3, 4} :Range[4]

3、给出列表 {4, 3, 2, 1} :Reverse@Range@4

5、给出列表{1,2,3,4,4,3,2,1}:x = Range@4Join[x, Reverse@x]

7、给出20个不大于10的随机正整数的列表：RandomInteger[{1, 10}, 20]

9、用简单的方法求代码 Join[{1, 2}, Join[{3, 4}, {5}]] 的运行结果：Range[5]

11、Reverse[Join[Range[20], Reverse[Range[20]]]] 运行结果：Join[Range[20], Reverse[Range[20]]]

13、给出列表 {3, 2, 1, 4, 3, 2, 1, 5, 4, 3, 2, 1}：Join[Flatten@Table[Reverse@Range [n], {n, {3, 4, 5}}]]