计算机在材料科学中的应用上机指导书1

《计算机在材料科学中的应用》上机指导书 计算机在材料科学中的应用》
材料学院
实验目录
学时） 实验一 方程求根 （2 学时） ................................................................. 2 线性方程组求解（ 学时） 实验二 线性方程组求解（2 学时） ....................................................... 5 学时） 实验三 最小二乘法曲线拟合及回归分析数值计算 （4 学时）.....10 插值计算（ 学时） 实验四 插值计算（2 学时） .................................................................15 实验五 传热学计算机分析 （2 学时） ...............................................17 学时） 学时） 实验六 相图热力学计算 （4 学时） ...................................................19 学时） 实验七 互联网在材料科学中的应用 （2 学时） ...............................21 常用软件学习（ 学时） 实验八 常用软件学习（2 学时） .........................................................23
实验一 方程求根一、实验目的及任务要求
2 学时
1、实验目的： 1）熟悉程序设计语言，了解简单的程序设计方法； 2）熟悉迭代法求方程根及牛顿法求方程的算法设计； 3）熟悉简单算法程序编写及调试方法。 2、任务要求： 1）熟悉机房环境； 2）理解算法原理及程序编译过程。
二、实验操作过程1、熟悉 VB（或 C 语言）编译软件界面 VB 语言是一种面向对象的高级程序设计语言， 目前应用较多的是 Visual Basic6.0 版本。 界面如图所示：
窗体
代码 窗口
属性
2、熟悉算法 1）二分法求方程根
1
2）牛 顿法求方程根
1
3、程序设计 1）例题分析：以二分迭代法求解方程 x3-x-1=0 在区间［0，2］中的根（精度为 e=10-6） f(x)= x3-x-1。 程序设计（VB） ： Private Sub cmdjisuan_Click() Dim x1 As Single, x2 As Single, x3 As Single x1 = 0 x2 = 2 Do x3 = (x1 + x2) / 2 If (x1 * x1 * x1 - x1 - 1) * (x3 * x3 * x3 - x3 - 1) > 0 Then x1 = x3 Else x2 = x3 End If Loop Until Abs(x2 - x1) < 0.000001 txtroot.Text = (x1 + x2) / 2 End Sub 2）计算例题： 已知方程式：f(x)=x3+4x2-10=0 一阶导函数：f'(x)=3x2+8x 二阶导函数：f"(x)=6x+8
给定条件：x0=1.0, ε=0.00001, N=1000 计算结果：x*=1.3652300 牛顿法程序设计： Private Sub cmdjisuan_Click() Dim x As Single Dim n As Integer n=0 x = txtx0.Text Do While Abs(F(x)) > 0.00001 x = x - F(x) / dF(x) n=n+1 If n > 1000 Then txtroot.Text = "迭代发散" Exit Sub End If Loop txtroot.Text = x End Sub Private Function F(x0 As Single) As Single F = x0 * x0 * x0 + 4 * x0 * x0 - 10 End Function Private Function dF(x1 As Single) As Single dF = 3 * x1 * x1 + 8 * x1 End Function
实验二 线性方程组求解一、实验目的及任务要求
2 学时
1、实验目的： 1）熟悉雅可比迭代法及其算法设计； 2）熟悉追赶法解

线性方程组及其算法设计； 3）熟悉简单算法程序编写及调试方法。 2、任务要求： 1）熟悉线性方程组常用数值解法； 2）理解算法原理及程序编译过程。
二、实验操作过程1、雅可比迭代法算法设计 线性方程组的矩阵表达式为 AX=b，其一般形式为： Aijxj=bi (i=1,2,………, n j=1,2,………, n) 将此式改写为迭代格式：
xi = (bi ? ∑ a ij x j ) / a iij =1 j ≠i
n
（i=1, 2, ……., n）
程序设计： 计算例题：
给定初始值 x(0)=[0,0,0]T 选代求解为 x*=[3,2,1]T 程序设计(VB)： Option Explicit Option Base 1 Private a(3, 3) As Single, b(3) As Single, x(3) As Single, y(3) As Single Private Sub cmdjisuan_Click() a(1, 1) = 8: a(1, 2) = -3: a(1, 3) = 2 a(2, 1) = 4: a(2, 2) = 11: a(2, 3) = -1 a(3, 1) = 6: a(3, 2) = 3: a(3, 3) = 12 b(1) = 20: b(2) = 33: b(3) = 36 y(1) = txtx1.Text: y(2) = txtx2.Text: y(3) = txtx3.Text Dim i As Integer, j As Integer, N As Single, M(3) As Single, t As Single Do For i = 1 To 3 t=0 For j = 1 To 3 If i <> j Then t = t + a(i, j) * y(j)
End If Next j x(i) = (b(i) - t) / a(i, i) Next i For i = 1 To 3 M(i) = Abs(x(i) - y(i)) Next N = M(1) For i = 2 To 3 If N < M(i) Then N = M(i) End If Next For i = 1 To 3 y(i) = x(i) Next Loop While N > 0.00000001 txtroot1.Text = x(1): txtroot2.Text = x(2): txtroot3.Text = x(3) End Sub 2、追赶法解线性方程组 三对角方程组的形式如下：
界面设计
追赶法程序框图：
计算例题： VB 程序： Option Explicit Option Base 1 Private Sub cmdjisuan_Click() Dim a(5) As Single, b(5) As Single, c(5) As Single, d(5) As Single a(2) = -1: a(3) = -1: a(4) = -1: a(5) = -1
b(1) = 4: b(2) = 4: b(3) = 4: b(4) = 4: b(5) = 4 c(1) = -1: c(2) = -1: c(3) = -1: c(4) = -1 d(1) = 100: d(2) = 200: d(3) = 200: d(4) = 200: d(5) = 100 Dim i As Integer d(1) = d(1) / b(1): c(1) = c(1) / b(1) Dim t As Single For i = 2 To 4 t = b(i) - a(i) * c(i - 1) c(i) = c(i) / t d(i) = (d(i) - a(i) * d(i - 1)) / t Next d(5) = (d(5) - a(5) * d(4)) / (b(5) - a(5) * c(4)) For i = 4 To 1 Step -1 d(i) = d(i) - c(i) * d(i + 1) Next txtx1.Text = d(1): txtx2.Text = d(2): txtx3.Text = d(3): txtx4.Text = d(4): txtx5.Text = d(5) End Sub Private Sub Command1_Click() txtx1.Text = "": txtx2.Text = "": txtx3.Text = "": txtx4.Text = "": txtx5.Text = ""
界面设计：
实验三 最小二乘法曲线拟合及回归分析数值计算一、实验目的及任务要求1、实验目的： 1）熟悉最小二乘法曲线拟合算法设计； 2）熟悉该算法程序编写及调试方法。 2、任务要求： 1）熟悉一元及多元线性回归数值解法； 2）理解算法原理及程序编译过程。
4 学时
二、实验操作过程1、一元线性回归 已知现场的一组实测数据如下：
选用直线方程，其形式为：y=a+bx 一元线性回归的计算步骤： 1）输入原始数据 输入原始数据主要包括，实测点的个数 n，n 组实测点值 xi 及函数值 yi。

2）循环求和计算 计算∑x, ∑y, ∑x2, ∑y2, ∑xy 3）构造正则方程组： a11=N a12=∑x b1=∑y 2 a21=∑x a22=∑x b2=∑xy 4）求解二元一次线性方程组
利用克拉姆法则计算：
程序设计： Option Explicit Option Base 1 Private Sub Command1_Click() Dim n As Integer Dim x(4) As Single, y(4) As Single, b(2) As Single x(1) = 2: x(2) = 4: x(3) = 6: x(4) = 8: y(1) = 2: y(2) = 11: y(3) = 28: y(4) = 40 Dim a(2, 2) As Single
a(1, 1) = 4 Dim i As Integer, x1 As Single, x2 As Single, t(3) As Single For i = 1 To 4 a(1, 2) = a(1, 2) + x(i) a(2, 2) = a(2, 2) + x(i) * x(i) b(1) = b(1) + y(i) b(2) = b(2) + x(i) * y(i) Next a(2, 1) = a(1, 2) t(1) = a(1, 1) * a(2, 2) - a(1, 2) * a(2, 1) t(2) = b(1) * a(2, 2) - b(2) * a(1, 2) t(3) = a(1, 1) * b(2) - a(2, 1) * b(1) x1 = t(2) / t(1): x2 = t(3) / t(1) txta.Text = x1: txtb.Text = x2 End Sub Private Sub Command2_Click() txta.Text = "": txtb.Text = "" End Sub 2、多元线性回归 P17 例 2 分析：求 y 对 x1, x2, x3 的线性回归方程。表 2—2 去碳量 y 与天然矿石和烧 结矿石的加入量 x1, x2 及熔化时间 x3 实测数据 n=49， 此题是三元线性回归，其回归系数 a1、a2、a3 满足三元正规方程： l11a1+l12a2+l13a3=l1y l21a1+l22a2+l23a3=l2y l31a1+l32a2+l33a3=l3y
1 1 1 (∑x1)2 l12=l21=∑x1x2(∑x1)(∑x2) l13=l31=∑x1x3(∑x1)(∑x3) l22=∑ N N N 1 1 1 x 22(∑x2)2 l23=l32=∑x2x3- (∑x2)(∑x3) l33=∑x32- (∑x3)2 N N N 1 1 1 l1y=∑x1y(∑x1)(∑y) l2y=∑x2y(∑x2)(∑y) l3y=∑x3y(∑x3)(∑y) N N Nl11 = ∑x12计算步骤： 1）输入数据：N＝49，x1i, x2i, x3i, yi (i=1,2, ……, 49) 2) 计算：∑x12、∑x22、∑x32、∑x1、∑x2、∑x3、∑x1x2、∑x2x3、∑x1x3、∑x1y、∑x2y、 ∑x3y、∑y 3)计算线性方程组系数 lij 并解线性方程组 4）计算 a0，求出三元线性回归方程式。 程序设计（VB） ：
Option Explicit Option Base 1 Private Sub cmdjisuan_Click() Dim x1(49) As Double, x2(49) As Double, x3(49) As Double, y(49) As Double x1(1) = 2: x1(2) = 7: x1(3) = 5: x1(4) = 12: x1(5) = 1 x1(6) = 3: x1(7) = 3: x1(8) = 6: x1(9) = 7: x1(10) = 0 x1(11) = 3: x1(12) = 0: x1(13) = 8: x1(14) = 6: x1(15) = 0 x1(16) = 3: x1(17) = 7: x1(18) = 16: x1(19) = 6: x1(20) = 0 x1(21) = 9: x1(22) = 4: x1(23) = 0: x1(24) = 9: x1(25) = 2 x1(26) = 9: x1(27) = 12: x1(28) = 6: x1(29) = 12: x1(30) = 0 x1(31) = 5: x1(32) = 4: x1(33) = 0: x1(34) = 6: x1(35) = 4 x1(36) = 10: x1(37) = 4: x1(38) = 5: x1(39) = 9: x1(40) = 6 x1(41) = 5: x1(42) = 5: x1(43) = 8: x1(44) = 2: x1(45) = 7 x1(46) = 4: x1(47) = 10: x1(48) = 3: x1(49) = 4 x2(1) = 18: x2(2) = 9: x2(3) = 14: x2(4) = 3: x2(5) = 20 x2(6) = 12: x2(7) = 17: x2(8) = 5: x2(9) = 8: x2(10) = 23 x2(11) = 16: x2(12) = 18: x2(13) = 4: x2(14) = 14: x2(15) = 21 x2(16) = 14: x2(17) = 12: x2(18) = 0: x2(19) = 16: x2(20) = 15 x2(21) = 0: x2(22) = 6: x2(23) = 17: x2(24) = 0: x2(25) = 16 x2(26) = 6: x2(27) = 5: x2(28) = 13: x2(29) = 7: x2(30) = 24 x2(31) = 12: x2(32) = 15: x

2(33) = 20: x2(34) = 16: x2(35) = 17 x2(36) = 4: x2(37) = 14: x2(38) = 13: x2(39) = 8: x2(40) = 13 x2(41) = 8: x2(42) = 11: x2(43) = 6: x2(44) = 13: x2(45) = 8 x2(46) = 10: x2(47) = 5: x2(48) = 17: x2(49) = 15 x3(1) = 50: x3(2) = 40: x3(3) = 46: x3(4) = 43: x3(5) = 64 x3(6) = 40: x3(7) = 64: x3(8) = 39: x3(9) = 37: x3(10) = 55 x3(11) = 60: x3(12) = 49: x3(13) = 50: x3(14) = 51: x3(15) = 51 x3(16) = 51: x3(17) = 56: x3(18) = 48: x3(19) = 45: x3(20) = 52 x3(21) = 40: x3(22) = 32: x3(23) = 47: x3(24) = 44: x3(25) = 39 x3(26) = 39: x3(27) = 51: x3(28) = 41: x3(29) = 47: x3(30) = 61 x3(31) = 37: x3(32) = 49: x3(33) = 45: x3(34) = 42: x3(35) = 48 x3(36) = 48: x3(37) = 36: x3(38) = 36: x3(39) = 51: x3(40) = 54 x3(41) = 100: x3(42) = 44: x3(43) = 63: x3(44) = 55: x3(45) = 50 x3(46) = 45: x3(47) = 40: x3(48) = 64: x3(49) = 72
y(1) = 4.3302: y(2) = 3.6485: y(3) = 4.483: y(4) = 5.5468: y(5) = 5.497 y(6) = 3.1125: y(7) = 5.1182: y(8) = 3.8759: y(9) = 4.67: y(10) = 4.9536 y(11) = 5.006: y(12) = 5.2701: y(13) = 5.3772: y(14) = 5.4849: y(15) = 4.596 y(16) = 5.6645: y(17) = 6.0795: y(18) = 3.2194: y(19) = 5.8075: y(20) = 4.7306 y(21) = 4.6805: y(22) = 3.1272: y(23) = 2.6104: y(24) = 3.7174: y(25) = 3.8946 y(26) = 2.7066: y(27) = 5.6314: y(28) = 5.8152: y(29) = 5.1302: y(30) = 5.391 y(31) = 4.4583: y(32) = 4.6569: y(33) = 4.5212: y(34) = 4.865: y(35) = 5.3566 y(36) = 4.6098: y(37) = 2.3815: y(38) = 3.8746: y(39) = 4.5915: y(40) = 5.1588 y(41) = 5.4372: y(42) = 3.996: y(43) = 4.397: y(44) = 4.0622: y(45) = 2.2905 y(46) = 4.7115: y(47) = 4.531: y(48) = 5.3637: y(49) = 6.0771 Dim i As Integer, x1x1 As Single, x11 As Single, x22 As Single, x2x2 As Single, x33 As Single, x3x3 As Single Dim x1x2 As Single, x2x3 As Single, x1x3 As Single, x1y As Single, x2y As Single, x3y As Single, yy As Single For i = 1 To 49 x11 = x11 + x1(i) Next For i = 1 To 49 x1x1 = x1x1 + x1(i) * x1(i) x1x2 = x1x2 + x1(i) * x2(i) x1x3 = x1x3 + x1(i) * x3(i) x22 = x22 + x2(i) x2x2 = x2x2 + x2(i) * x2(i) x2x3 = x2x3 + x2(i) * x3(i) x33 = x33 + x3(i) x3x3 = x3x3 + x3(i) * x3(i) x1y = x1y + x1(i) * y(i) x2y = x2y + x2(i) * y(i) x3y = x3y + x3(i) * y(i) yy = yy + y(i) Next Dim a(3, 3) As Single, b(3) As Single a(1, 1) = x1x1 - (x11 / 49) * x11 a(1, 2) = x1x2 - (x11 / 49) * x22 a(1, 3) = x1x3 - (x11 / 49) * x33 a(2, 2) = x2x2 - x22 * (x22 / 49) a(2, 3) = x2x3 - x22 * (x33 / 49) a(3, 3) = x3x3 - x33 * (x33 / 49) a(2, 1) = a(1, 2): a(3, 2) = a(2, 3): a(3, 1) = a(1, 3) b(1) = x1y - x11 * (yy / 49) b(2) = x2y - x22 * (yy / 49) b(3) = x3y - x33 * (yy / 49) txt11.Text = a(1, 1)
txt12.Text = a(1, 2) txt13.Text = a(1, 3) txt22.Text = a(2, 2) txt23.Text = a(2, 3) txt33.Text = a(3, 3) txt1y.Text = b(1) txt2y.Text = b(2) txt3y.Text = b(3) a(2, 1) = a(1, 2): a(3, 1) = a(1, 3): a(3, 2) = a(2, 3) y(1) = 0.1: y(2) = 0.1: y(3) = 0 Dim j As Integer, N As Single, M(3) As Single, t As Single, x(3) As Single Do For i = 1 To 3 t=0 For j = 1 To 3 If i <> j Then t = t + a(i, j) * y(j) End If Next j x(i) = (b(i) - t) / a

(i, i) Next i For i = 1 To 3 M(i) = Abs(x(i) - y(i)) Next N = M(1) For i = 2 To 3 If N < M(i) Then N = M(i) End If Next For i = 1 To 3 y(i) = x(i) Next Loop While N > 0.000001 txta1.Text = x(1): txta2.Text = x(2): txta3.Text = x(3) Dim a0 As Single a0 = yy / 49 - x(1) * x11 / 49 - x(2) * x22 / 49 - x(3) * x33 / 49 txta0.Text = a0 End Sub Private Sub Command2_Click() txt11.Text = "":txt12.Text = "":txt13.Text = "":txt22.Text = "" txt23.Text = "":txt33.Text = "":txt1y.Text = "":txt2y.Text = "" txt3y.Text = "":txta1.Text = "": txta2.Text = "": txta3.Text = "":txta0.Text = ""
End Sub
实验四 插值计算一、实验目的及任务要求1、实验目的： 1）熟悉拉格朗日算法流程； 2）掌握三次样条插值计算方法； 2）熟悉该算法程序编写及调试方法。 2、任务要求： 1）熟悉插值计算方法； 2）理解算法原理及程序编译过程。
2 学时
二、实验操作过程1、拉格朗日插值法程序程序流程图：
读该流程图并试编写程序。 2、三次样条插值函数计算步骤： （1）按所给边界条件及所给节点（xi, yi）计算λi，μi，di；
（2）在所给边界条件下解方程组计算出 Mi（i=0, 1, 2, …… n） ； （3）将所求得的 Mi 代入分段插值公式，求出各小区间［xi, xi-1］上的样条函数 Si(x)； 程序设计： 设给定函数表及边界条件 S” （x0） =S”(x2)=0， 求三次样条插值函数， 并求 f(x)在 x=3, 4, 5 处的近似值。
根据上述计算思路编写程序并上机调试。
实验五 传热学计算机分析一、实验目的及任务要求1、实验目的： 1）熟悉传热学基本理论； 2）掌握导热问题的数值解法； 2、任务要求： 1）编写程序实现简单导热问题的数值求解。
2 学时
二、实验操作过程1、导热问题的数值解法 （1）有限差分法 向前差商：
df f(x +△x) - f(x) f(x +△x) - f(x) = lim ≈ dx △ x →0 △x △x
df f(x) - f(x -△x) ≈ dx △x df 1 f(x +△x) - f(x) f(x) - f(x -△x) f(x +△x) - f(x -△x) 中心差商： ≈ [ + ]= dx 2 △x △x 2△x向后差商： 一阶差商仍然是 x 的函数，可以继续对它求差商：
d2 f ≈ dx 2
f(x +△x) - f(x) f(x) - f(x -△x) ? f(x +△x) - 2f(x) + f(x -△x) △x △x = △x (△x) 2
2、有限差分法的求解步骤 （1）根据问题的性质确定导热微分方程式、初始条件和边界条件； （2）对区域进行离散化，确定计算节点； （3）建立离散方程，对每一个节点写出表达式； （4）求解线性方程组； （5）对解进行分析。 3、实例分析 例题：设有一炉墙，厚度为δ，已知内壁温度为 t0 为 500℃，外壁温度 t4 为 100℃，求厚度 方向的温度分布。 该问题属于一维稳态导热问题，导热微分方程：
d 2t =0 dx 2
A：采用积分方法求解： 炉墙的温度分布：
B：采用有限差分法求解： 首先将区域离散化，对于

稳态导热问题，只需要将空间区域离散。
把要求解的空间区域 0～δ以间距△x 划分成 m 等分，这些等分线为网格线，以每一网格线 为中心，宽度为△x 组成一系列子区间，称为元体。元体的中心称为节点。 计算时，以节点的温度作为元体的平均温度，如将节点 i 的温度作为 i 元体的平均温度，记 为 ti；边界节点 0 和 m 则为半个元体的平均温度，记为 t0 和 tm。 常物性、一维、无内热源、稳定导热的微分方程为： 代入差分方程：
d 2t =0 dx 2
d 2 t t(x +△x) - 2t(x) + t(x -△x) t i +1 ? 2t i + t i ?1 ≈ = =0 dx 2 (△x) 2 (△x) 2当 m=4 时建立差分方程如下： t0=500 t2-2t1+t0=0 t3-2t2+t1=0 t4-2t3+t2=0 t4=100 根据上述计算方法编写程序并上机调试。
实验六 相图热力学计算一、实验目的及任务要求1、实验目的： 1）熟悉在线相图查询网站； 2）熟悉相图的热力学计算方法； 3）熟悉简单相图计算程序。 2、任务要求： 1）熟悉相图热力学数值计算方法。
4 学时
二、实验操作过程1、在线相图计算： FACT 是世界排名数一数二的热力学计算软件，提供在线热力学据计算，二元三元相图 计 算 等 等 强 大 功 能 。 下 面 的 网 址 提 供 在 线 常 用 相 图 查 询crct.polymtl.ca/FACT/documentation/
试访问该网站并查询相图，以下为在线查得 Al2O3－SiO2 相图。
For an equilibrium point calculation, point and click on the figure
ORY:
enter manually the coordinates (IE only):
错误！未找到引用源。 错误！未找到引用源。 错误！未找到引用源。X: 错误！未找到引用源。
错误！未找到引用源。 错误！未找到引用源。
2、NiO－MgO 完全固溶体相图绘制 NiO－MgO 为液、固相连续互溶二元体系，液相和固相均为理想溶液。已知 NiO 和 MgO 的熔点分别为 1960℃和 2800℃，熔化热分别为 52.3kJ/Mol 和 77.4kJ/Mol。以纯液态 NiO 作为 NiO 的标准态，纯固态 MgO 作为 MgO 的标准态，则 △G NiO 和 △G MgO 近似计算 公式为：
△G MgO =77400(1-
T ) 3073
△G NiO =52300(1-
T ) 2233
设 1 为 NiO，2 为 MgO，则有s L x NiO = x NiO exp
△G sNiO RTs
s L x MgO = x MgO exp
△G s MgO RT
又因为 1－ x MgO ＝ x NiO 1－ xMgO ＝ x NiOs MgO L MgO
s
L
L
所以：1－ x
=(1－ x
△G sNiO ) exp RT
s L xMgO = xMgO exp
△G s MgO RT
△G NiO ) L RT 求得： xMgO ＝ △G MgO △G NiO exp( ) - exp( ) RT RT 1 ? exp(
△G MgO △G NiO )]exp( ) s RT RT x MgO ＝ △G MgO △G NiO exp( ) - exp( ) RT RT [1 ? exp(即可计算出 NiO－MgO 完全固溶相图。 试采用 VB 语言实现上述计算。
实验七 互联网在材料科学中的应用一、实验目的及任务要求1、实验目的： 1）熟悉材料专业网站； 2）熟悉通用及专用搜索引擎的使用； 3）熟悉数据库资源的使

用。 2、任务要求： 1）熟悉利用互联网查阅专业资料。
2 学时
二、实验操作过程1、访问材料专业网站 1）协会网站 利用专业学会网站是获取专题信息的一个捷径，它除了提供学会介绍、论文征集启事 外，还提供与专题有关的电子出版物、热门话题、标准信息以及专业数据库等。 国际材料研究学会联合会（International Union of MRS）的网址：b67539be960590c69ec37659 中国材料研究学会：b67539be960590c69ec37659 中国材料网：b67539be960590c69ec37659 , 该网站是在科技部、国家自然科学基金委员 会、教育部和中国科学院的支持下，在全国各个材料科研单位和高等院校的协助下，依托于 中国材料研究学会和清华大学材料科学与工程研究院，由国家现代材料科技信息中心承办 的。 中心作为国际互联网上专门建立的首家国家级材料专业信息网络， 为我国材料科技界和 材料工业界的大范围交流、合作和服务提供了新的手段。服务群体主要是各科研院所、企事 业单位有关材料行业科研人员和高等院校材料专业广大师生，主要服务内容有：免费浏览、 会员之家及交流栏目等。 比较著名的与材料研究相关的协会网站如下： 材料研究协会 b67539be960590c69ec37659 金属矿石和材料协会（TMS）b67539be960590c69ec37659 国际晶体学联合会 b67539be960590c69ec37659/welocme 2)专业综合网站 关于某个学科专业的综合信息网站， 对该学科作综合性的介绍， 使人们对该学科有一个 全面的了解并可以方便的找到所需要的信息资源。 陶瓷材料： 中国陶瓷信息资源网：b67539be960590c69ec37659 中国陶瓷网：b67539be960590c69ec37659 21 世纪陶瓷网：b67539be960590c69ec37659 中华陶瓷在线：b67539be960590c69ec37659 以上是国内有名气的陶瓷综合信息网站。 金属材料：中国钢铁网：b67539be960590c69ec37659 全面准确地介绍国内外钢铁工业 的面貌以及每日最新的钢铁动态。 中国金属网：b67539be960590c69ec37659 钢铁信息网 b67539be960590c69ec37659 中国联 合钢铁网 b67539be960590c69ec37659 等均是国内比较著名的金属综合信息网站。 3）研究机构网站 材料研究所 b67539be960590c69ec37659 材料预备中心 b67539be960590c69ec37659/mat-ref/mpc
安大略材料研究中心：queensu.ca/ocmr 哥德堡材料学中心：cms.fy.chalmers.se 等。 2、数据库资源 1）专利数据库 IBM 知识产权网 IPN（The IBM Intellectual Property Network）于 1997 年推出，网址 为 b67539be960590c69ec37659，具有数据库容量大、数据更新及时、检索性能优异、开放性好等特 点。1974 年后公布的美国专利提供全文图像。 中国专利信息网：b67539be960590c69ec37659 英国德温特专利库：b67539be960590c69ec37659 日本专利信息组织：japio.or.jp 中国

专利文献数据库：b67539be960590c69ec37659 2）材料性能数据库 b67539be960590c69ec37659/性能数据库：这是一个有关材料的综合数据库，包括热塑性树 脂和热固性树脂等高分子材料，铝和铜等高分子材料，铝和铜等金属材料，陶瓷、半导体以 及其他一些工程材料的性能。 3）论文数据库 Springer 全文电子期刊、美国化学学会（ACS）会刊、英国皇家化学学会（RSC）全文 电子期刊及数据库、Science 全文、Nature 全文、IEEE 全文数据库以及国内的中国期刊网和 维普、万方数据库、超星图书馆等。 3、搜索引擎 1）b67539be960590c69ec37659 2）b67539be960590c69ec37659 4、材料科学文献检索 1）工程索引（EI） 美国工程索引（The Engineering Index） ，简称 EI，在全世界学术界、信息界享有盛誉， 也是历史最为悠久的一部大型综合性检索工具，创刊于 1884 年，所报道的文献涉及到工程 技术各方面的领域， 也包括大量材料科学与工程方面的文献， 但不收纯理论性的基础学科文 献和专利文献。通过校园网访问即可。 2）科学引文索引数据库（SCI） Science Citation Index：收录了自然科学、工程技术、生物科学等 150 多个学科领域内 的核心期刊 5800 多种，历来被全球学术界公认为最权威的科学技术文献的索引工具。 3）化学文摘（CA） 美国《化学文摘》 （Chemical Abstracts，简称 CA） ，由美国化学学会文摘服务社编辑出 版，创刊于 1907 年。是当今世界上公认的化学、化工领域文献的最权威的文献杂志，收录 了全世界 98％的化学、化工文献，还涉及生物、物理、医学、轻工、材料等许多领域。
实验八 常用软件学习 常用软件学习一、实验目的及任务要求1、实验目的： 1）熟悉多媒体课件制作； 2）了解 Origin 软件在材料科学中的应用 2、任务要求： 1）熟悉多媒体课件的制作技术。
2 学时
二、实验操作过程1、多媒体课件制作 学会用 PowerPiont 制作简单多媒体课件。任意选取同材料有关的素材，制作一多媒体课件。 1）材料的搜索和组织 2）演示文稿的制作 3）放映方式及动画效果的设置 4）演示文稿的放映和发布。 2、了解 origin 软件 Origin 是美国 Microcal 公司出的数据分析和绘图软件。 特点：使用简单，采用直观的、图形化的、面向对象的窗口菜单和工具栏操作，全面支 持鼠标右键、支持拖方式绘图等。 两大类功能：数据分析和绘图。数据分析包括数据的排序、调整、计算、统计、频谱变 换、曲线拟合等各种完善的数学分析功能。准备好数据后，进行数据分析时，只需选择所要 分析的数据，然后再选择响应的菜单命令就可。Origin 的绘图是基于模板的，Origin 本身提 供了几十种二维和三维绘图模板而且允许用

户自己定制模板。 绘图时， 只要选择所需要的模 板就行。用户可以自定义数学函数、图形样式和绘图模板；可以和各种数据库软件、办公软 件、图像处理软件等方便的连接；可以用 C 等高级语言编写数据分析程序，还可以用内置 的 Lab Talk 语言编程等。 1）简单二维图的制作 一般来说数据按照 X Y 坐标存为两列，假设文件为 sindata.dat，如下格式： x sin(x) 0.0 0.000 0.1 0.100 0.2 0.199 0.3 0.296 输入数据请对准 data1 表格点右键调出如下窗口，然后选择 Inport ASCII 找到 sindata.dat 文 件打开就行
按住鼠标左键拖动选定这两列数据，用下图最下面一排按钮就可以绘制简单的图形， 按从左到右三个按钮做出的效果分别如下：
设置列属性 双击 A 列或者点右键选则 Properties，这里可以设置一些列的属性。
数据浏览：Data Display 动态显示所选数据点或屏幕点的 XY 坐标值 Data Selector 选择一段数据曲线，作出标志 一是鼠标，而是利用 Ctrl,Ctrl+Shift 与左右 箭头的组合，Data Reader 读取数据曲线上的选定点的 XY 值，Screen Reader 读取绘图窗口 内选定点的 XY 值，Enlarger 局部放大曲线，Zoom 缩放，注意利用方向键，以及与 Ctrl 和 Shift 的组合


本文来源：https://www.bwwdw.com/article/4k9e.html