查看“《超越学科的认知基础》2015张世超学习报告第六周”的源代码


== 关键词 ==
'''Mathematica'''[https://en.wikipedia.org/wiki/Mathematica] '''Metaphor'''[https://en.wikipedia.org/wiki/Metaphor]

== 学习报告 ==
===隐喻===
*隐喻性概念的系统化
[[File:隐喻概念的系统性结构.jpg|400px]]
**隐喻性表达和隐喻性概念系统紧密相连，隐喻性概念的适用离不开其整体概念系统的构建。为了更好地阐述什么是隐喻性概念系统，我们首先要了解隐喻概念的基础。
{| class="wikitable"
!colspan="8"|隐喻的基础
|-
|隐喻的基础
|身体基础（Physical basis)
|经验基础
|社会基础（Social basis）
|-
|含义
|通过人的身体姿势以及动作暗含着的某种隐喻意义。
|人的日常生活经验和常识构成的基础。
|文化样态下的人们的文化传统思维
|-
|举例
|低垂的姿势通常与悲伤联系在一起，挺直的姿势则表达一种积极的情感。（他陷入昏迷：He sank into a coma.)人类睡觉时是躺着的，清醒时是站立的;严重的疾病迫使人躺下，死的时候身体是完全躺下的。体型通常和身体力量相关，在斗争中获胜者往往处于上方等。
|“更多为上，更少为下”“理性化为上，情绪化为下。”
|比如在我们的社会文化中，时间是宝贵的，因此就有了十佳就是金钱，时间是有限的资源，时间是宝贵的商品等概念。
|}
===关于隐喻概念前景化、连贯性以及系统性的结论===
*大多数基本概念是根据一个或多个空间化隐喻组织而成的。
*每个空间化隐喻内部具备系统性。
*空间化隐喻的系统性存在一个全局外部系统性，决定隐喻中的连贯性。
*空间化隐喻扎根于物理和文化经验中。
*隐喻存在很多可能的身体和社会基础。
*隐喻的身体基础和文化基础难以区分。


===Mathematica简介===
Mathematica是一款由Stephen Wolfram[[https://en.wikipedia.org/wiki/Stephen_Wolfram]和他的团队共同研发的算符计算程序（Symbolic computing program),也叫做计算机代数程序（computer algebra program).其强大的功能不仅可以处理2D空间的算符、向量、代数问题，还可以进行3D图像的合成。这个软件本身就是一个隐喻的转换器，通过各种数字符号的输入从而导出各种我们认知领域内的图像、数字结果。

===Mathematica 指令表[https://www.teambition.com/project/55e87360f31d7ebb58c0c24a/files/55e87360f31d7ebb58c0c250/work/5615d75952f8ca117801b40e]===

{| class="wikitable"
!colspan="8"|Mathematica 指令表
|-
|操作
|指令
|-
|enter i
|type esc-ii-esc
|-
|enter square root
|control -2
|-
|enter "e"
|esc-ee-esc
|-
|power
|control-6
|-
|fraction
|control-forwardslash
|-
|evaluate
|shift-return
|-
|new line
|return
|-
|alias for the last output expression
|%
|-
|make substitution
|/.
|-
|Expand 
|Expand[  ]
|-
|Simplify x²+(2x²+sin(x))
|Simplify[x²+(2x²+sin[x])]
|-
|Factorise
|Factor[x²-1]
|-
|Evaluate πto decimal places
|N[π，100]
|-
|poly=1+3x+5x³+6sin[x]
|poly=1+3x+5x³+6sin[x]
|-
|extract the coefficient
|Coefficient[poly,x²]
|-
|Solve the equation z=x²+1 for x (remember to use == not =)
|z==x²+1
|-
|Solve the system of equations:x+y+z=1 x-y=2
|Solve[x+y+z==1&&x-y==2,{x,y,z}] 
|-
!colspan="8"|complex numbers                      
|-
|absolute value
|Abs[z]
|-
|Argument value
|Arg[z]
|-
|Complex conjugate
|Conjugate[z]
|-
|Imaginary 
|Im[z]
|-
|real component
|Re[z]
|-
!colspan="8"|Linear algebra
|-
|Define a 2*2 matrix A with elements 1,2,3,4 and a 2 element vector v with element v1 and v2.
|A={[1,2],[3,4]} v={v1,v2} A//MatrixForm
|-
|Determinant
|Det[A]
|-
|Mutiply the matrix A by the Vector v.
|A.v %//MatrixForm
|-
|Inverse
|Inverse[A]//MatrixForm
|-
|MatrixPower
|[A,2]//MatrixForm  or A²//MatrixForm
|-
|Transpose
|Transpose[A]//MatrixForm
|-
|Extract
|A[[1]]//MatrixForm
|-
|Make a 10×10 matrix and automatically populate if with a formula.
|M=Table[i*j+sin[i+j},{i,1,10},{j,1,10}];M//MatrixForm
|-
|data={1,2,3,4,5}
|av2[v_]:=Total[v]/Length[v];av2[data]
|-
!colspan="8"|Function
|-
|Define a function;f[x_]:=cos[x]+sin[x];g[x_]:=cos[x]-2;
|Evaluate+for x =1;N[f[1],500]
|-
|Average:Write a function av(v) 
|evaluate it for {1,2,3,4,5}
|-
!colspan="8"|Plotting
|-
|Plot the function sin(x) in the range 0<x<5
|Plot [sin[x],{x,0,5}]
|-
|Superimpose the plots of sin(x) and cos(x)
|Plot[{sin[x],cos[x]},{x,0,10}]
|-
|Make a 3D plot of sin(x)cosxy over the range 0<x<5,0<y<5
|Plot 3D[sin[x]Cos[y],{x,0,5},{y,0,5}]
|-
|Change the font size and disale the mesh 
|Plot3D[sin[x]cos[y],{x,0,5},{y,0,5}] BaseStyle→{FontSize→14}
|-
|Make a density plot
|DensityPlot[sin[x]cos[y],{x,0,5}]
|-
|Make a parametric plot in 3D x=cos(t), y=sin(t) z=t {t,0,4π}]
|ParametricPlot3D[{cos[t],sin[t],t]
|-
!colspan="8"|Calculus
|-
|Solving the differential equations
|Dsolve[ ]
|-
|Derivatives 
|D[sin[x],x]
|-
|Take the indefinite integral
|Integrate[sin[x],x]
|-
!colspan="8"|Sums
|-
|Add up number i² from 0≤i≤n
|Sum[i²,{i,1,n}]
|-
!colspan="8"|Flow control
|-
|Step function,if x>0, +1,if x<0 -1,if x=0 ,1
|d[x_]:=If[x>0,1,0] d[1],d[-1]
|}
==参考文献==
*外部链接：
**维基词条'''Mathematica'''[https://en.wikipedia.org/wiki/Mathematica]
**维基词条'''Metaphor'''[https://en.wikipedia.org/wiki/Metaphor]
**维基词条'''Steve Wolfram'''[https://en.wikipedia.org/wiki/Stephen_Wolfram]
*书籍： 《我们赖以生存的隐喻》[美]乔治·莱考夫 马克·约翰逊 著  何文忠 译  浙江大学出版社 P1-20
*视频：《Introduction to Mathematica》 [https://www.teambition.com/project/55e87360f31d7ebb58c0c24a/files/55e87360f31d7ebb58c0c250/work/5615d75952f8ca117801b40e]