Списъци и преобразования на списъци, извличане на елементи
Пример 1. Векторите и други подобни математически обекти се представят в Mathematica чрез списък от подредени елементи, обединени в къдрави скоби. Списъкът може да се запомни в обикновена клетка. Извличането на конкретен елемент става с операцията [[ ]] - двойни средни скоби. Ето два петмерни вектора.
{1,2,3,4,5}
a={-2.2,3.2,0,2,0}
a[[1]]
a[[3]]
Пример 2. Повдигането в квадрат, степенуване или друго действие се извършва поелементно.
b={0,1,2,3,4,5}
Пример 3. Конкретни замествания със стойност на променливите и извличане на 2-ри и 3-ти елемент от получените резултати.
c1 /.x->2
c2 /. {x->1, y->2z}
%[[2]] (* Извличане на втория елемент от предишния резултат *)
%%[[3]] (* Трети елемент от предпредходния резултат *)
Пример 4. Почленно диференциране - първа и втора производна по x. Може да се използват и математически символи от палетите и др.
Пример 5. Таблицата е също списък, но елементите му се пресмятат по формули.
1 |
8 |
27 |
64 |
125 |
216 |
343 |
512 |
729 |
1000 |
Пример 6. Например таблица на функцията при x променящо се в интервала [0, 1] със стъпка 0.2 се получава така:
Пример 7. Ето генериране на 5 случайни числа в интервалаа [0,1]. След това се генерират 6 случайни числа в интервала [1,49], които се сортират по възходящ ред с функцията Sort.
Table[Random[],{5}]
Table[Random[Integer,{1,49}],{6}]
s1=Sort[%]
Пример 8. Показване на списъка вертикално.
TableForm[s1]
5 |
9 |
13 |
23 |
38 |
43 |
Пример 9. Същото с функцията ColumnForm.
ColumnForm[s1]
5 |
9 |
13 |
23 |
38 |
43 |
Пример 10. Съставяне на двумерен списък, който е списък от списъци и показването му по различни начини.
a=.
a=Table[i+j,{i,1,3},{j,1,3}]
TableForm[a]
ColumnForm[a]
2 | 3 | 4 |
3 | 4 | 5 |
4 | 5 | 6 |
{2, 3, 4} |
{3, 4, 5} |
{4, 5, 6} |
Пример 11. Матрица 2 на 4.
b=Table[i+j,{i,1,2},{j,1,4}]
TableForm[b]
MatrixForm[b]
2 | 3 | 4 | 5 |
3 | 4 | 5 | 6 |
Пример 12. Извличане на елементи от матрица.
b[[1]]
b[[2,3]]
Part[b,1]
Пример 13. Произведение на вектори и матрици.
Clear[a,b,c,p,q,r,u,v]
u={a,b,c}
v={p,q,r}
u.v
Created by Mathematica (December 29, 2007)