mirror of
https://github.com/adambard/learnxinyminutes-docs.git
synced 2024-12-24 01:51:38 +00:00
141 lines
6.4 KiB
Markdown
141 lines
6.4 KiB
Markdown
---
|
||
language: wolfram
|
||
contributors:
|
||
- ["hyphz", "http://github.com/hyphz/"]
|
||
translators:
|
||
- ["wuyudi", "http://github.com/wuyudi/"]
|
||
filename: learnwolfram-cn.nb
|
||
lang: zh-cn
|
||
---
|
||
|
||
Wolfram 语言是最初在 Mathematica 中使用的底层语言，但现在可用于多种场合。
|
||
|
||
Wolfram 语言有几个界面。
|
||
|
||
- Raspberry Pi 上的命令行内核界面（就叫 _The Wolfram Language_），它是交互式运行的，不能产生图形输入。
|
||
- _Mathematica_ 是一个丰富的文本/数学编辑器，内置交互式的 Wolfram: 在 "代码单元 "上按 shift+Return 键可以创建一个输出单元，输出结果，这不是动态的。
|
||
- _Wolfram Workbench_，这是 Eclipse 与 Wolfram 语言后端的界面。
|
||
|
||
本例中的代码可以在任何界面中输入，并使用 Wolfram Workbench 进行编辑。直接加载到 Mathematica 中可能会很不方便，因为该文件不包含单元格格式化信息（这将使该文件作为文本阅读时变得一团糟）--它可以被查看/编辑，但可能需要一些设置。
|
||
|
||
```mathematica
|
||
(* 这是一个注释 *)
|
||
|
||
(* 在Mathematica中，您可以创建一个文本单元格，用排版好的文本和图像来注释您的代码，而不是使用这些注释 *)
|
||
|
||
(* 输入一个表达式返回结果 *)
|
||
2*2 (* 4 *)
|
||
5+8 (* 13 *)
|
||
|
||
(* 调用函数 *)
|
||
(* 注意，函数名（和其他所有东西）是区分大小写的 *)
|
||
Sin[Pi/2] (* 1 *)
|
||
|
||
(* 带有一个参数的函数调用的替代语法 *)
|
||
Sin@(Pi/2) (* 1 *)
|
||
(Pi/2) // Sin (* 1 *)
|
||
|
||
(* WL 中的每一种语法都有一些等价的函数调用，即万物皆函数 *)
|
||
Times[2, 2] (* 4 *)
|
||
Plus[5, 8] (* 13 *)
|
||
|
||
(* 第一次使用一个变量定义它，并使其成为全局变量 *)
|
||
x = 5 (* 5 *)
|
||
x == 5 (* 返回真，C-style 的赋值和相等测试 *)
|
||
x (* 5 *)
|
||
x = x + 5 (* 10 *)
|
||
x (* 10 *)
|
||
Set[x, 20] (* 当我说万物皆函数时 我是认真的 *)
|
||
x (* 20 *)
|
||
|
||
(* 因为WL是基于计算机代数系统的, *)
|
||
(* 可以使用未定义的变量，它们只是阻碍了计算 *)
|
||
cow + 5 (* 5 + cow, cow 是未定义的，所以无法进一步计算 *)
|
||
cow + 5 + 10 (* 15 + cow, 它将尽力计算 *)
|
||
% (* 15 + cow, % 获取最后一次返回的内容 *)
|
||
% - cow (* 15, 未定义的变量cow被消去 *)
|
||
moo = cow + 5 (* 小心，moo 现在是一个表达式，不是一个数字! *)
|
||
|
||
(* 定义一个函数 *)
|
||
Double[x_] := x * 2 (* 注意 := 防止对RHS进行即时计算。
|
||
而 x 后面的 _ 表示没有模式匹配的约束条件*)
|
||
Double[10] (* 20 *)
|
||
Double[Sin[Pi/2]] (* 2 *)
|
||
Double @ Sin @ (Pi/2) (* 2, @-syntax 避免了闭括号的队列 *)
|
||
(Pi/2) // Sin // Double(* 2, //-syntax 按执行顺序列举了函数 *)
|
||
|
||
(* 对于命令式编程，使用 ; 来分隔语句。 *)
|
||
(* 丢弃 LHS 的任何输出并运行 RHS *)
|
||
MyFirst[] := (Print@"Hello"; Print@"World") (* 请注意，外侧的小括号是关键
|
||
;的优先级低于:= *)
|
||
MyFirst[] (* 你好，世界 *)
|
||
|
||
(* C-Style 的 For 循环，注：在 Mathematica 中使用 For 循环是低效的 *)
|
||
PrintTo[x_] := For[y=0, y<x, y++, (Print[y])] (* 开始，测试，自增，循环体 *)
|
||
PrintTo[5] (* 0 1 2 3 4 *)
|
||
|
||
(* While 循环 *)
|
||
x = 0; While[x < 2, (Print@x; x++)] (* 带测试和程序体的 while 循环 *)
|
||
|
||
(* If 和 条件 *)
|
||
x = 8; If[x==8, Print@"Yes", Print@"No"] (* Condition, true case, else case *)
|
||
Switch[x, 2, Print@"Two", 8, Print@"Yes"] (* 值匹配风格切换 *)
|
||
Which[x==2, Print@"No", x==8, Print@"Yes"] (* Elif风格切换 *)
|
||
|
||
(* 除参数外的变量默认为全局变量，即使在函数内部也是如此 *)
|
||
y = 10 (* 10, 全局变量 y *)
|
||
PrintTo[5] (* 0 1 2 3 4 *)
|
||
y (* 5, 全局的 y 被 PrintTo 内的循环计数器所占用 *)
|
||
x = 20 (* 20, 全局变量 x *)
|
||
PrintTo[5] (* 0 1 2 3 4 *)
|
||
x (* 20, PrintTo 中的 x 是一个参数，并自动局部化 *)
|
||
|
||
(* 局部变量使用 Module 元函数声明 *)
|
||
(* 带本地变量的版本 *)
|
||
BetterPrintTo[x_] := Module[{y}, (For[y=0, y<x, y++, (Print@y)])]
|
||
y = 20 (* 全局变量 y *)
|
||
BetterPrintTo[5] (* 0 1 2 3 4 *)
|
||
y (* 20, 那更好 *)
|
||
|
||
(* 实际上，模块允许我们声明任何我们喜欢的作用域 *)
|
||
Module[{count}, count=0; (* 声明这个变量count的作用域 *)
|
||
(IncCount[] := ++count); (* 这些函数都在该作用域内 *)
|
||
(DecCount[] := --count)]
|
||
count (* count - 全局变量 count 未定义 *)
|
||
IncCount[] (* 1, 使用作用域内的counter变量 *)
|
||
IncCount[] (* 2, incCount 升级了它 *)
|
||
DecCount[] (* 1, decCount 也是 *)
|
||
count (* count - 这个名字依旧不是全局变量 *)
|
||
|
||
(* Lists *)
|
||
myList = {1, 2, 3, 4} (* {1, 2, 3, 4} *)
|
||
myList[[1]] (* 1 - 注意列表索引从 1 开始，而不是从 0 开始。 *)
|
||
Map[Double, myList] (* {2, 4, 6, 8} - 函数式列表的 map 函数 *)
|
||
Double /@ myList (* {2, 4, 6, 8} - 以上的缩略语法 *)
|
||
Scan[Print, myList] (* 1 2 3 4 - 命令式循环 *)
|
||
Fold[Plus, 0, myList] (* 10 (0+1+2+3+4) *)
|
||
FoldList[Plus, 0, myList] (* {0, 1, 3, 6, 10} - 存值的 Fold *)
|
||
Append[myList, 5] (* {1, 2, 3, 4, 5} - 注意 myList 没有更新 *)
|
||
Prepend[myList, 5] (* {5, 1, 2, 3, 4} - 如果想让 myList 更新，就加上 "myList = " *)
|
||
Join[myList, {3, 4}] (* {1, 2, 3, 4, 3, 4} *)
|
||
myList[[2]] = 5 (* {1, 5, 3, 4} - 这确实更新了myList *)
|
||
|
||
(* 关联，又称字典/哈希值 *)
|
||
myHash = <|"Green" -> 2, "Red" -> 1|> (* 创建一个关联 *)
|
||
myHash[["Green"]] (* 2, 使用 *)
|
||
myHash[["Green"]] := 5 (* 5, 更新 *)
|
||
myHash[["Puce"]] := 3.5 (* 3.5, 扩展 *)
|
||
KeyDropFrom[myHash, "Green"] (* 抹去绿色的键 *)
|
||
Keys[myHash] (* {Red, Puce} *)
|
||
Values[myHash] (* {1, 3.5} *)
|
||
|
||
(* 做 Wolfram 的演示时 你不能不展示这个 *)
|
||
Manipulate[y^2, {y, 0, 20}] (* 返回一个反应式的用户界面，显示y^2
|
||
并允许通过滑块在 0-20 之间调整y。
|
||
只适用于图形前端 *)
|
||
```
|
||
|
||
## 想多来点?
|
||
|
||
- [Wolfram Language Documentation Center](http://reference.wolfram.com/language/)
|