第10章 数据文件
- 格式：ppt
- 大小：406.50 KB
- 文档页数：28
下载文档原格式
合集下载
FORTRAN知识点总结
F O R T R A N第2章FORTRAN90基础知识：程序单元的概念:fortran90程序是一种分块形式的程序，整个程序由若干程序单元块组成。
每个程序只有一个主程序单元。
各单元体的程序体形式上相同。
程序单元可以是主程序、子程序（外部过程或内部过程）、模块MODULE （供其他程序单元引用即把该程序单元内的全部语句复制到程序单元中）或块数据程序单元BLOCK 。
语言元素：指在程序设计中用到的基本成分，如字符集、常量、变量、记号（标号、关键字、名字、常数、运算符和定界符）以及其他的基本结构等。
字符集：英文字母、阿拉伯数字、下划线、21个特殊字符（$和？没有规定用法）。
数据结构：整型INTEGER （34-2下划线后面是种别参数），n 位字长的计算机的数据表示范围一般为12~211-+---n n ，种别参数由内在询问函数KIND 送回，种别值提供的最小范围由内在函数SELECTED-INT-KIND 送回，表示十进制幂的范围由内在函数RANGE 送回；实型REAL ，小数形式和指数形式；复型COMPLEX （种别类型参数值取实部与虚部中较大者）；字符型CHARACTER，由一对单撇号或双撇号之间的字符序列组成；逻辑型LOGICAL。
派生数据类型TYPE；数组INTEGER,DIMENSION(1,50)::A，可直接对数组元素进行运算如3*A,SQRT(A)；字符子串，在字符串CHARACTER(LEN=80)::ROW中，ROW(1:3)就表示字符串ROW中第1到第3个元素组成的子串。
变量名的命名规则：不能超过31个字符；组成成分是字母、数字、下划线；第一个字符必须是字母。
第3章基本语句：类型说明语句：类型说明（种别说明），属性说明：：变量名表尽量避免把两个实数作相等或不相等的比较。
淘汰隐式说明IMPLICIT NONE种别说明：种别参数即对可移植数据精度和范围进行选择的机制KIND(X) 返回变元X的种别参数值SELECTED-REAL-KIND(n,m) 产生一个种别值，它表示某一精度和范围。
chap10(文件)
10.2 文件操作 在对文件读、写之前必须先打开该文件， 在对文件读 、 写之前必须先打开该文件 ， 使用结束后 应关闭该文件。 应关闭该文件。 一、 文件打开函数 fopen 函数调用格式： 函数调用格式： FILE *fp; fp=fopen(“文件名”,“使用方式”); 文件名” 使用方式 使用方式” 文件名 打开指定的文件，以指定的使用方式进行访问。 打开指定的文件，以指定的使用方式进行访问。 说明： 说明： 指向打开的文件后, 就可以用它来访问该文件。 用 fp 指向打开的文件后 就可以用它来访问该文件。 文件名”为任何合法的DOS文件名。 文件名。 “文件名”为任何合法的 文件名 有的C 版本只用r、 、 ，或只用rw、 而不用r+、 有的 版本只用 、w、a，或只用 、ra 而不用 、 w+、a+ 、 在程序运行时， 系统自动打开三个标准文件stdin、 在程序运行时 ， 系统自动打开三个标准文件 、 stdout、stderr。 、 。
第 10 章
10.1 文件操作库函数
文件
一、 概述 C语言将文件看作是一个字符 字节 序列组成的 。 语言将文件看作是一个字符(字节 序列组成的。 语言将文件看作是一个字符 字节)序列组成的 分为ASCII文件和二进制文件两种。 文件和 两种。 分为 文件 二进制文件两种 C的“缓冲 输出 文件系统” 文件系统 ” 自动 缓冲区 地在内存中开辟 一个文件缓冲区, 程序 一个文件缓冲区 磁盘 在对文件进行处 数据区 文件 理时, 通过文件 输入 缓冲区进行输入 缓冲区 与输出。 与输出。
文本文件中的回车换行符在输入时转换为一个换行符， 文本文件中的回车换行符在输入时转换为一个换行符， 在输出时又转换为回车换行符。 在输出时又转换为回车换行符。 为了可靠地打开指定的文件, 常用下列方法： 为了可靠地打开指定的文件 常用下列方法： if ((fp=fopen(“file1” , “ r ”))==NULL) { printf(“cannot open this file\n”); exit(0); } 二、 文件关闭函数 fclose 使用完一个文件后必须关闭它， 使用完一个文件后必须关闭它 ， 以防数据丢失和 被其它操作误用。 被其它操作误用。 fclose函数的调用格式： 函数的调用格式： 函数的调用格式 fclose(文件指针 文件指针); 文件指针 关闭文件时的操作就是使指针与文件“脱钩” 关闭文件时的操作就是使指针与文件“脱钩”。正常 关闭时fclose函数返回 值，关闭有误时返回非 值。 函数返回0值 关闭有误时返回非0值 关闭时 函数返回
第10章多维标度分析
第10章多维标度分析10.1多维标度法的基本思想当维数p>3时，即使给出了p维空间R P中n个样本点的坐标，我们都难以想象这n个点的相互位置关系，因此自然希望在我们熟悉的低维空间R k(k<p,如k=1,2,3)中能以较高的相似度重新展示这n个点的数据结构，并由此对原始样本数据进行统计分析.另外，即使维数p≤3,有时问题也不容易解决.比如地图上任意两个城市之间的直线距离和实际道路距离不一样，若仅给了一组城市相互间的实际道路距离，你能否标出这些城市之间的相对位置呢?又假定只知道哪两个城市最近，哪两个城市次近，等等，你还能确定它们之间的相对位置吗?重新标度的位置与实际位置相似度达到多大?把上面的不同“城市”换作不同的“产品”、“品牌”、“指标”等，也会遇到类似的问题.多维标度法(multidimensional scaling,MDS)就是一类将高维空间中的研究对象(样本或变量)简化到低维空间中进行定位、归类和分析，同时又有效地保留研究对象间原始关系的多元数据分析技术的总称，是一种维数缩减方法.多维标度法于20世纪40年代起源于心理测度学，用于大致测定人们判断的相似性，1958年Torgerson在其博士论文中首先正式提出了这一方法.多维标度法现在已广泛应用于心理学、市场营销、经济管理、交通、生态学及地质学等领域.多维标度法内容丰富、方法较多，其理论分析手段与主成分分析有相通之处，但也有自己的特点.根据研究对象的相关指标是用距离、比例等度量化数据给出还是用顺序、秩等给出，相应的分析方法分为度量分析法和非度量分析法，而古典多维标度法是其中最常用的度量分析法.10.2古典多维标度法下面根据参考文献[2],用一个例子来介绍几个与多维标度法相关的基本概念.【例10.1】(数据文件为eg10.1)表10-1给出了我国部分城市间的距离，由于道路弯弯曲曲，这些距离并不是这些城市间的真正距离.我们希望在地图上重新标出这八个城市，使得它们之间的距离尽量接近表10-1中的距离.表10-1 我国八个城市间的距离单位：千米北京天津济南青岛郑州上海杭州南京北京0天津118 0济南439 363 0青岛668 571 362 0郑州714 729 443 772 0上海1259 1145 886 776 984 0杭州1328 1191 872 828 962 203 0南京1065 936 626 617 710 322 305 0 10.2.1多维标度法的几个基本概念定义10.1一个n×n阶矩阵,如果满足条件(1)(2)则称矩阵D为广义距离阵，dij称为第i点与第j点间的距离.注意：这样定义的距离不是通常意义下的距离，而是通常距离的拓广，比如人们熟悉的距离三角不等式在这里就未必成立.对于距离阵,多维标度法的目的是要寻找较小的正整数k(如k=1,2,3)和相应低维空间R k中的n个点x₁,x₂,…,xn ,记表示xi与xj在R k中的欧氏距离，使得与D在某种意义下尽量接近.将找到的这n个点写成矩阵形式称X为D的一个古典多维标度(CMDS)解.在多维标度分析中，形象地称xi为D的一个拟合构造点，称X为D的拟合构图，称为D的拟合距离阵.特别地，当=D时，称xi为D的构造点，称X为D的构图.又若X为D的构图，令式中，P为正交阵，a为常数向量，则Y=(y₁,y₂,…,yn)也为D的构图，这是因为平移和正交变换不改变两点间的欧氏距离，即若D的构图存在，那么它是不唯一的.定义10.2对于一个n×n的距离阵,如果存在某个正整数k和R k中的n个点x₁,x₂,…,xn,使得(10.1)则称D为欧氏距离阵.下面讨论如何判断一个距离阵D是否为欧氏距离阵；在已知D为欧氏距离阵的条件下，如何确定定义10.2中相应的k和R k中的n个构造点x₁,x₂,…,xn.令(10.2)(10.3)式中，In 为n×n阶单位阵，1n,为分量全为1的n维列向量.借助这些定义，下面给出一个距离阵D为欧氏距离阵的充要条件.定理10.1设D为n×n阶距离阵，B由式(10.3)定义，则D是欧氏距离阵的充要条件为B≥0.证明：(必要性)设D是欧氏距离阵，由定义和式(10.2)可知，存在正整数k 和R k中的n个构造点x₁,x₂,…,xn,使得又由式(10.3)可得(10.5)式中，为元素全为1的nxn阶矩阵.注意式中(10.6)将它们代入式(10.5)中，可得(10.7)由式(10.4)知,再结合式(10.6),可得(10.8)将代入式(10.8),化简可得式中，将式(10.9)表示为矩阵形式，得到这里乘积HX所得的结果是将X中心化，即(10.10)(充分性)反之，若B≥0,记k=rank(B),λ₁,λ₂,…,λk (λ₁≥λ₂≥…≥λk>0)为B的正特征值，x(1),(2),…,x(k)为相应的特征向量，且令注意：这里x₁,x₂,…,xn表示由X的各行转置后得到的k×1列向量.令A=diag(λ₁,λ₂,…,λk),,则,即P的列为标准正交化特征向量，于是(10.11)由此可得说明正好是D的构图，所以D是欧氏距离阵，充分性得证.注意：充分性的证明给出了从欧氏距离阵D出发得到构图X的方法，即D→A→B→X具体步骤为：由D知dij,由得A,再由得B,最后求B的特征值λ₁,λ₂,…,λk和相应的特征向量x(1),(2),…,x(k),n×k阶矩阵X=(x(1),(2),…,x(k))的行向量转置后得到的n个k×1列向量x₁,x₂,…,xn 即为D的n个构成点，而矩阵即为D的构图，据式(10.11),X 也可以由来计算.由定理10.1知，D是欧氏距离阵的充要条件是B≥0.因此若B有负特征值，那么D一定不是欧氏距离阵，此时不存在D的构图，只能求D的拟合构图，记作,以区别真正的构图X.在实际中，即使D为欧氏距离阵，记它的构图为n×k 矩阵X,当k较大时也失去了实用价值，这时宁可不用X,而去寻找低维的拟合构图.也就是说，在D的构图不存在和构图存在但k较大两种情形下都需要寻找D的低维拟合构图.令这两个量相当于主成分分析中的累积贡献率，我们希望k不要取太大，就可以使a₁.k和a₂.k比较大，比如说，大于80%就比较合适.当k取定后，用表示B的对应于特征值λ₁,λ₂,…,λk的正交化特征向量，使得.通常还要求λk >0,若λk<0,要缩小k的值.最后，令则即为D的拟合构图，或者说为D的古典多维标度解，(均为k×1列向量)即为D的n个拟合构造点.有的文献也把称为X的主坐标，把多维标度分析称为主坐标分析.下面用一个具体例子(参见参考文献[2])来说明上述求解步骤.【例10.2】设有距离阵D如下(为简洁起见，对称阵都只写出上三角部分):由于,可求得A,āig ,āgj及āgg如下：再由bij =aij-āig-āgj+āgg可得由于B的7个列b₁,b₂,…,b₇有如下线性关系b₃=b₂-b₁,b₄=-b₁,b₅=-b₂,b₆=b₁-b₂,b₇=0于是B的秩最多为2,注意到B的第一个二阶主子式非退化，故rank(B)=2=k,并且可求得B的7个特征值分别为：λ₁=λ₂=3,λ₃=λ₄=…=λ₇=0且对应于λ₁,λ₂的特征向量分别为：故7个拟合构造点在R²中的坐标分别为：(√3/2,1/2),(√3/2,-1/2),(0,-1),(-√3/2,-1/2),(-√3/2,1/2),(0,1 ),(0,0)因为B≥0,所以原矩阵D是欧氏距离阵，故这7个拟合构造点就是D的构造点.容易验证，这7个构造点在R²中的欧氏距离阵恰为D,即10.2.2已知距离矩阵时CMDS解的计算上面计算CMDS解的过程在R中可使用stats包中的cmdscale()函数来实现，也可以使用MASS包中处理非度量MDS问题的isoMDS()函数来实现，但cmdscale()函数的好处是可以同时计算出B的特征值和特征向量以及两个累积贡献率a₁.k 和a₂.k的值.【例10.3】(数据文件为eg10.3)根据表10-1给出的我国八个城市间的距离矩阵D,利用R软件stats包中的cmdscale()函数求D的CMDS解，给出拟合构图及拟合构造点.解：在R中的程序为：#例10.3打开数据文件eg10.3.xls,选取数据区域C2:K10,然后复制>eg10.3=read.table("clipboard",header=T) #在R中读入数据>D10.3=cmdscale(eg10.3,k=2,eig=T) #k取为2,eig=T给出矩阵B的前两个特征#向量和特征值>D10.3$points[,1] [,2]北京-658.14610 -52.301759天津-522.00992 -133.917153济南-229.30657 32.365307青岛-80.72182 -277.225217郑州-171.98297 474.047645上海610.52727 -102.636996杭州659.93216 5.717159南京391.70794 53.951014$eig[1]1.756015e+06 3.367695e+05 7.888679e+04 3.770390e+041.320482e+04 -4.001777e-11 -1.434722e+04 -3.259473e+04......>sum(abs(D10.3$eig[1:2]))/sum(abs(D10.3$eig)) #计算a1.2[1] 0.9221257>sum((D10.3$eig[1:2])~2)/sum((D10.3$eig)~2) #计算a2.2[1] 0.9971656>x=D10.3$points[,1]>y=D10.3$points[,2]>plot(x,y,xlim=c(-700,800),ylim=c(-300,600)) #绘散点图(见图10-1)#根据两个特征向量的分量大小>text(x,y,labels=s(eg10.3),adj=c(0,-0.5),cex=0.8) #名标出#将拟合点用行#名标出图10-1我国八城市距离阵的拟合构图由R计算结果可见，矩阵B的八个特征值分别为：1756015,336770,78887,37704,13205,0,-14347,-32595最后两个特征值为负，表明距离矩阵D不是欧氏距离阵.a1.2=92.2%,a2.2=99.7%,故k=2就可以了.由前两个特征向量可得八个拟合构造点分别为：(-658.1,-52.3),(-522.0,-133.9),(-229.3,32.4),(-80.7,-277.2) (-172.0,474.0),(610.5,-102.6),(659.9,5.7),(391.7,54.0)容易计算出八个拟合构造点在R²中的欧氏距离阵，如表10-2所示.将它们与表10-1中城市间的原始距离数据进行比对，可以发现大多数距离数据拟合较好，少数数据误差较大.表10-2我国八个城市间的距离阵的拟合构图10.2.3已知相似系数矩阵时CMDS解的计算定义10.3一个n×n阶的矩阵,如果满足条件(1)(2)则称C为相似系数矩阵，cij称为第i点与第j点间的相似系数.在进行多维标度分析时，如果已知的数据不是n个对象之间的广义距离，而是n个对象间的相似系数，则只需将相似系数矩阵C按式(10.12)转换为广义距离阵D,其他计算与上述方法相同.令(10.12)由定义10.3可知，,显见,故D为距离)为欧氏距离阵. 阵，可以证明，当C≥0时，由式(10.12)定义的距离阵D=(dij【例10.4】(数据文件为eg10.4)为了分析下列六门课程之间的结构关系，找到了由劳雷和马克斯维尔得到的相关系数矩阵(见表10-3).其中，相关系数的值越大(小),表示课程越(不)相似.易见相关系数矩阵也为相似系数矩阵，记为C,求C的CMDS解，并给出拟合构图及拟合构造点.表10-3六门课程相关系数矩阵盖尔语英语历史算术代数几何盖尔语 1 0.439 0.41 0.288 0.329 0.248 英语0.439 1 0.351 0.354 0.32 0.32g 历史0.41 0.351 1 0.164 0.19 0.181 算术0.288 0.354 0.164 1 0.595 0.47 代数0.329 0.32 0.19 0.595 1 0.464 几何0.248 0.329 0.181 0.47 0.464 1解：据表10-3知，.于是由变换式(10.12)知(10.13)由式(10.13)易得六门课程的广义距离阵D,如表10-4所示.表10-4由六门课程相关系数矩阵转化所得的距离阵盖尔语英语历史算术代数几何盖尔语0 1.059 1.086 1.193 1.158 1.226英语 1.059 0 1.139 1.137 1.166 1.158 历史 1.086 1.139 0 1.293 1.273 1.280 算术 1.193 1.137 1.293 0 0.900 1.030 代数 1.158 1.166 1.273 0.900 0 1.035 几何 1.226 1.158 1.280 1.030 1.035 0余下工作可以仿照例10.3进行，在R中的程序为：#例10.4打开数据文件eg10.4.xls,选取数据区域A10:G16,然后复制>eg10.4=read.table("clipboard",header=T) #在R中读入数据>D10.4=cmdscale(eg10.4,k=2,eig=T) #k取为2,eig=T给出矩阵B的前两个特#征向量和特征值>D10.4$points[,1] [,2]盖尔语0.4028583 0.26570653英语0.2415986 0.48339407历史0.6210937 -0.50817963算术-0.4575066 0.03803193代数-0.4216733 -0.04017726几何-0.3863706 -0.23877565$eig[1]1.142825e+00 6.225908e-01 6.022539e-01 5.245848e-013.963587e-01 1.998401e-15......>sum(abs(D10.4$eig[1:2]))/sum(abs(D10.4$eig)) #计算a1.2[1] 0.5368268>sum((D10.4$eig[1:2])^2)/sum((D10.4$eig)~2) #计算a2.2[1] 0.6805523>x=D10.4$points[,1]>y=D10.4$points[,2]>plot(x,y,xlim=c(-0.6,0.8),ylim=c(-0.6,0.7)) #根据两个特征向量的分量大小绘制拟合图>text(x,y,labels=s(eg10.4),adj=c(0,-1),cex=0.8) #将拟合点用行名标出由R计算出的B的六个特征值按大小顺序依次为：λ₁=1.1428,λ₂=0.6226,λ₃=0.6023,λ₄=0.5246,λ₅=0.3964λ₆=0.0000因为a1.2=53.68%,a2.2=68.06%,不足80%,可考虑取k=3(这里从略).由前两个特征向量可得8个拟合构造点，分别为：(0.403,0.266),(0.242,0.483),(0.621,-0.508),(-0.458,0.038),(-0.422,-0. 040),(-0.386,-0.239).图10-2大体反映了这六门课程的基本结构，从图中可以直观地看出，算术、代数、几何较为接近，英语和盖尔语较为相近，而历史课程与其他课程的差异较大.图10-2六门课程相似系数矩阵的古典拟合构图10.3非度量多维标度法在实际问题中，涉及更多的可能是不易量化的相似性测度，如两种颜色的相似性，虽然我们可以用较小(大)的数字表示颜色非常(不)相似，但是这里的数字只表示颜色之间的相似或不相似程度，并不表示色彩实际的数值大小，因而这是一种非度量的定序尺度，能够利用的唯一信息就是这种顺序(秩).古典多维标度法基于主成分分析的思想，在低维空间上利用主坐标重新标度距离，这时式中，是距离dij 的拟合值；eij是拟合误差.但有时dij和之间的拟合关系可以表示为：(10.14)式中，f为一个未知的单调递增函数.这时，我们用来构造的唯一信息就是{dij }的秩，将{dij,i<j}从小到大排列为：与(i,j)所对应的dij 在上面的排列中的名次(由小到大)称为(i,j)的秩或dij的秩.我们欲寻找一个拟合构图(或一组拟合构造点),使后者相互之间的距离也有如上的次序，即并记为：这种模型大多出现在相似系数矩阵的场合，因为相似系数强调的是研究对象之间的相似，而不是它们的距离.在处理这种模型的各种方法中，最为流行的是Shepard-Kruskal算法，它的计算步骤如下：(1)已知相似系数矩阵D=(dij)(这里仍用D来记相似系数矩阵),并将其非对角元素从小到大排列为：(2)设是k维拟合构造点，相应的距离阵为,令(10.15)极小是对一切而言的，使上式达到极小的称为对的最小二乘单调回归.如果,在式(10.15)中取,这时是D 的构图.若对X作一正交平移变换yi =Pxi+b,P为正交阵，b为常数向量，则式(10.15)的分子不变.(3)若k固定，且能存在一个,使得则称为k维最佳拟合构图.(4)由于Sk (也称为压力指数，stress)是k的单调下降序列，取k,使Sk适当地小.例如Sk ≤5%最好，5%<Sk≤10%次之，Sk>10%较差.求解可用梯度法进行迭代(参见参考文献[2]).10.4案例分析与R实现案例10.1(数据文件为case10.1)表10-5给出了2010年我国31个省、直辖市、自治区农村居民家庭人均生活消费支出的统计数据.一共选取8个指标：x₁为食品消费；x₂为衣着消费；x₃为居住消费；x₄为家庭设备用品及服务；x₅为交通通信；x₆为文教娱乐用品及服务；x₇为医疗保健；x8为其他商品和服务支出.试用多维标度法对其进行统计分析，并对分析结果的实际意义进行解释.表10-5 2010年我国各地区农村居民家庭人均生活消费支出单位：元地区x₁x₂x₃x₄x₅x₆x₇x8北京2994.66 699.42 1990.21 473.62 1112.44 950.61 840.61 193.21天津2060.83 365.86 888.32 233.02 467.48 462.25 360.47 98.50河北1351.41 250.92 839.66 218.90 464.80 462.25 360.47 78.87山西1372.49 315.78 614.70 173.62 357.74 420.21 328.92 80.40内蒙古1675.04 317.71 751.99 177.91 598.61 374.19 467.97 97.41辽宁1714.15 369.15 745.03 185.23 448.97 500,28 413.83 112.87吉林1523.32 309.75 752.79 171.92 368.64 454.05 462.42 104.47黑龙江1483.95 387.17 793.80 164.63 455.90 560.71 443.16 101.86上海3806.82 554.13 2020.25 528.01 1459.45 997.65 584.51 209.66 江苏2491.51 350.01 1170.88 327.69 785.53 908.10 362.28 146.87浙江3055.59 551.53 2044.32 410.62 1145.99 839.19 709.30 172.34安1632.96 232.20 867.51 231.23 338.99 363.92 264.39 82.10 徽2537.15 310.14 865.50 292.71 638.07 462.17 251.36 141.23 福建江1812.66 174.61 782.72 205.27 331.81 285.23 243.84 75.48 西1804.45 305.56 832.95 324.70 649.21 421.91 383.89 84.51 山东河1371.17 261.52 765.18 254.47 401.44 250.47 287.83 90.14 南湖1763.05 217.61 816.42 262.26 331.35 288.12 295.24 116.73 北湖2087.85 209.85 719.20 243.90 343.82 315.93 293.59 96.23 南2630.05 215.51 986.70 235.01 637.08 326.53 307.43 177.27 广东1675.41 110.46 692.51 192.77 310.30 182.55 228.99 62.30 广西1724.47 117.36 609.77 135.22 312.53 318.04 138.35 90.49 海南1750.01 224.13 548.00 260.71 281.73 239.03 270.31 50.70 重庆1881.18 226.62 625.28 239.48 360.70 218.62 276.06 69.59 四川1319.43 137.49 621.80 135.64 229.66 186.19 178.07 44.21 贵州云1604.50 160.72 638.09 167.66 337.85 206.45 239.94 43.11 南西1325.71 326.65 352.88 181.27 282.43 51.06 71.16 75.77藏1299.22 237.87 837.54 233.37 336.22 397.61 376.20 75.77 陕西1315.25 184.23 551.63 146.93 256.70 238.03 203.13 46.0g 甘肃1442.88 255.19 944.23 193.59 369.60 198.53 307.92 62.55 青海1541.77 302.61 776.44 188.12 444.02 241.08 417.92 101.22 宁夏1394.38 303.66 695.17 137.69 382.14 170.15 314.73 59.94 新疆解：本案例我们采用R软件MASS包中的isoMDS()函数来实现分析计算(当然也可以用前面使用的cmdscale()函数),在R中的操作过程如下：#打开数据文件case10.1.xls,选取A2:I33区域，然后复制>case10.1<-read.table("clipboard",header=T) #将eg10.1.xls数据读入到#Case10.1中>D1=as.matrix(case10.1) #需要将数据转换成矩阵形式>D=dist(D1) #求距离阵>library(MASS) #载入MASS包，这样才能使用isoMDS()函数>fit=isoMDS(D,k=2)>fit$points[,1] [,2]北京-1882.08165 -405.5501799天津-181.18356 83.5568197河北378.06842 -316.9090361山西519.63551 -161.3723531内蒙古140.53475 -118.3236722辽宁239.59269 -57.3466211 吉林311.06135 -196.5769112 黑龙江257.18237 -303.2689490 上海-2574.54791 164.4633867 江苏-864.88942 19.9653109 浙江-1891.26840 -273.7180203 安徽241.99333 -56.7533361 福建-562.74468 426.2460037 江西187.41927 149.4628003 山东-23.94055 -68.0772001 河南480.52386 -165.0996828 湖北186.03261 68.3345125 湖南-11.86522 317.5767900 广东-645.99328 471.6486570 广西377.05811 164.2765177 海南362.23481 229.5403989 重庆360.53994 226.6307228 四川206.07019 261.9414880 贵州708.60794 -0.5224843 云南435.30179 117.9074584 西藏836.32175 163.8641180 陕西475.58204 -309.3702220 甘肃712.09253 -10.0972309 青海372.00020 -192.4072738 宁夏321.09711 -124.8186386 新疆529.56410 -105.2031733 $stress[1] 3.267686>x=fit$points[,1]>y=fit$points[,2]>plot(x,y) #画散点图(见图10-3)>text(x,y,labels=s(case10.1),adj=c(0.5,1.5),cex=0.7) #设置标签位#置大小>abline(h=0,v=0,lty=3) #采用虚线划分四个象限从图10-3可以比较直观地看出在总支出方面，上海、北京、广东、浙江、江苏、天津、福建等沿海地区是我国传统的经济发达地带，又是改革开放的前沿，雄厚的经济实力为农业和农村经济发展奠定了坚实的基础，农村居民的人均消费水平相对较高.北京在享受型消费方面领先于其他省区，说明北京的农民比较重视文化生活，由于他们身处祖国的政治文化中心，因此在文化、教育、医疗等方面有很高的消费和投入.而广东农民更重视物质上的消费，尤其在食物方面，广东人很下工夫，但是他们在文化生活上支出却不高，也不太注重这方面的投入.从总体来看，我国绝大多数地区农村居民家庭的消费水平比较低，消费结构不合理，我国农村居民家庭消费水平在不同地区间存在着明显的差异.图10-3 2010年我国农村居民家庭人均生活消费支出古典拟合构图习题10.1证明当C≥0时，由式(10.12)定义的距离阵D=(d₂)为欧氏距离阵.10.2(数据文件为ex10.2)在R中利用古典多维标度法对表10-6中的六个经济发展指标数据进行分析评价.其中，x₁为农业产值，x₂为林业产值，x₃为牧业产值，x₄为企业人数，x₅为企业总产值，x₆为利润总额.表10-6 2003年广东省各地区农村经济发展状况指标城市x₁x₂x₃x₄x₅x₆广州市97.84 1.28 38.86 141.98 2089.55 121.07深圳市11.20 0.66 12.59 156.52 418.16 50.12珠海市 5.67 0.11 3.60 17.39 360.58 10.58汕头市29.87 0.57 17.26 52.45 673.74 24.07佛山市52.39 0.29 32.14 90.77 1649.81 62.74韶关市47.82 4.47 18.44 27.91 144.51 16.14河源市33.57 3.10 12.84 12.62 51.25 4.73梅州市57.10 2.74 28.02 44.12 226.65 19.75惠州市61.57 4.70 25.20 70.38 568.79 40.39汕尾市29.82 1.70 12.09 30.52 189.00 6.78东莞市20.97 0.14 20.35 134.63 1380.42 74.01中山市16.87 0.21 5.33 91.43 1148.14 52.10江门市57.33 1.79 39.21 85.64 1252.07 32.68阳江市47.72 3.27 21.39 19.52 191.64 11.08湛江市87.20 4.72 34.07 40.60 390.06 20.96茂名市112.00 7.85 81.36 76.47 739.34 40.85肇庆市76.06 16.45 46.77 52.97 569.93 19.40清远市57.35 6.67 28.47 17.95 75.29 6.76潮州市27.05 1.63 14.88 35.22 501.63 20.97揭阳市71.08 2.09 26.43 50.52 891.76 17.79云浮市44.07 4.65 38.97 22.23 188.47 8.7010.3(数据文件为ex10.3)表10-7给出了2011年全国31个省、直辖市、自治区的城镇居民家庭人均消费性支出的8个主要指标数据，根据这些数据，采用多维标度法进行分析评价.表10-7全国31个省、直辖市、自治区城镇居民家庭人均消费性支出数据(2011年)单位：元地区食品x₁衣着x₂居住x₃家庭设备及用交通通信x₅文教娱乐x₆医疗保健x7其他x8品x₄北京6905.512265.881923.711562.553521.23306.821523.32975.37天津6663.311754.981763.441174.622699.532116.011415.39836.82河北3927.261425.991372.25809.85 1526.61203.99955.95 387.40山西3558.041461.91327.78832.74 1487.661419.43851.30 415.44内蒙古4962.42514.091418.61162.872003.541812.071239.36765.13辽宁5254.961854.631385.62929.37 1899.061614.521208.3643.15吉林4252.851769.471468.29839.31 1541.371468.341108.51562.48黑龙江4348.451681.881185.96723.58 1363.621190.871082.96476.89上海8905.952053.812225.681826.223808.413746.381140.821394.86江苏6060.911772.061187.741193.812262.192695.52962.45 647.06浙江7066.222138.991518.061109.423728.232816.121248.9811.51安徽5246.761371.011501.39690.66 1365.011631.28907.58 467.77福建6534.941494.961661.841179.842470.181879.02773.26 667.00江西4675.161272.881114.49914.88 1310.211429.3641.23 389.06山东4827.612008.841510.841013.822203.991538.44938.86 518.27河南4212.761706.941087.08977.52 1573.641373.94919.83 484.76湖北5363.681677.911172.11814.81 1382.21489.67915.72 347.68湖南4943.891499.021292.55940.79 1975.51526.1790.76 434.25广东7471.881404.62005.151370.283630.622647.94948.18 773.17广西5074.491019.341237.91884.85 2000.571502.65779.08 349.48海南5673.65 780.101342.29729.86 1830.81141.81783.34 360.91重庆5847.92056.791205.661079.271718.731474.881050.62540.63四川5571.691483.541226.141020.161757.521369.47735.26 532.52贵州4565.851209.881102.99857.55 1395.281331.43578.33 311.57云南4802.261587.18827.84 570.46 1905.861350.65822.41 381.38西藏5184.181261.29781.12 428.03 1278.0514.44 424.10 527.74陕西5040.471673.241193.81914.26 1502.441857.61100.51500.42甘4182.41470.21139.8660.48 1289.81158.3874.05 413.37肃7 6 5 0 0青海4260.271394.281055.15723.23 1293.45967.90 854.25 406.93宁夏4483.441701.731247.14885.36 1637.611441.18978.12 521.47新疆4537.461715.94888.16 791.43 1377.671122.18912.99 493.56 10.4(数据文件为ex10.4)对表10-8给出的我国12个城市间的航空距离矩阵D,利用R软件中的cmdscale()函数求D的CMDS解，并给出拟合构图X及拟合构造点.表10-8我国12个城市间的航空距离矩阵10.5(数据文件为ex10.5)在R中利用古典多维标度法对表10-9中给出的2006年我国东部和西部地区20省区工资水平数据.请对相关经济发展指标数据进行分析评价.其中x₁为国有单位工资，x₂为城镇集体单位工资，x3为股份合作单位工资，x₄为联营单位工资，x5为有限责任公司工资，x₆为股份有限公司工资，x₇为其他单位工资，x8为港、澳、台商投资单位工资，x9为外商投资单位工资.表10-9我国2006年20个省区工资水平数据单位元地区x₁x₂x₃x₄x₅x₆x₇x8X 9北京41313 17550 14603 20154 30732 54595 28023 52593 64192 河北17057 10255 12947 23894 17580 15835 10362 17282 18014 山西18540 12014 10208 16308 20554 15917 11883 14583 17363 内蒙古19275 12404 11216 12238 17439 18211 12966 14222 19041 辽宁20305 10793 13175 11859 18852 24453 10095 19206 19756 吉林16983 9106 9698 10413 15249 20657 10381 13461 22562 上海40141 22959 20912 30984 31305 43673 42206 26244 42556 江苏28143 15279 16199 17302 20453 25487 15954 18200 23446 浙江41920 22006 19220 32979 19903 26994 21657 19593 20950 江西16227 10000 12118 13939 14710 17365 10388 10982 13731 山东22552 13024 13588 27823 15732 17440 12798 15602 18248 湖北17708 10265 10787 14262 14683 14985 9671 12545 23261 湖南18459 12490 14442 14328 15754 18228 15525 15812 17574 广西18384 12025 11071 13637 16549 17854 13231 12910 22427 重庆21168 13471 14460 16283 15637 21497 13368 17098 25037 四川19884 12624 13522 14962 13251 16606 10693 16909 20749 贵州17248 12590 14796 12306 14227 19361 12482 13436 15359 云南19520 11859 12806 14890 16308 19720 10833 15054 20944 陕西16894 8879 19713 14943 18215 18856 13613 14634 18077 甘肃17836 11411 9832 6439 13998 22076 8407 16877 20139。
第10章单因素方差分析
第10章单因素方差分析单因素方差分析(0ne-Way ANOV A)，又称一维方差分析，它能够对单因素多个独立样本的均数进行比较，可以用10种检验方法对变量间的均数进行两两比较(即多重比较检验)并给出方差分析表，还可以作出5种类型图形(Type of plots)和2种均数图形(Means plot options)10.1 单因素方差分析的计量资料[例10—1] 某社区随机抽取了30名糖尿病患者、IGT异常人和正常人进行载脂蛋白(mg／dL)测定，结果示于表10—1。
试问3组人群的载脂蛋白测定结果含量是否相同？(倪宗瓒．卫生统计学．第4版，北京：人民卫生出版社，2001.50)本例是一个完全随机设计的单因素方差分析。
已建立SAS数据集文件并保存Sasuser.onewav4。
(1)进入SAS／Win(v8)系统，单击Solutions－Analysis－Analyst，得到分析家窗口。
(2)单击File-open By SAS Name—Sasuser-0neway4—0K，调入数据文件。
(3)在“分析家”窗口单击Statistics-ANOV A-One way ANOV A，得到图10—1所示对话框。
本例因变量(Dependent)为A(载脂蛋白)，单击A—Dependent。
自变量(1ndependent)：B(3种人的组别)，单击B—Independent 。
图10.1 0ne—way ANOV A：0neway4(单因素方差分析)对话框(4)单击Tests按钮，得到图10—2所示对话框。
在此对话框的ANOV A(F—检验)选项中可进行如下设置。
Analysis of variance，方差分析。
Welch’s variance-weighted ANOV A，威尔奇方差—权重方差分析。
Tests for equal variance，相等方差检验，即方差齐性检验。
Barlett’s test，巴特尼特检验。
第10章 E-R图及关系图
10.3.5 删除数据库关系图
在对象资源管理器中,展开【数据库关系图】 在对象资源管理器中,展开【数据库关系图】文件夹 右击要删除的数据库关系图,在弹出快捷菜单中选择【 .右击要删除的数据库关系图,在弹出快捷菜单中选择【删 命令,弹出【删除对象】对话框. 除】命令,弹出【删除对象】对话框.
什么是数据库的E 10.4.1 什么是数据库的E-R图
10.5
小结
不管是用于设计数据库的E-R图,还是SQL Server 图 还是 不管是用于设计数据库的 2008数据库生成的数据库关系图,都可帮助数据库操作者 数据库生成的数据库关系图, 数据库生成的数据库关系图 抽象现实世界的事物转化到信息数据的有力保障. 抽象现实世界的事物转化到信息数据的有力保障.E-R图是 图是 数据库设计中的概念设计的关键环节, 数据库设计中的概念设计的关键环节,数据库初学者尤其要 熟练掌握之. 熟练掌握之.
10.3.4 重命名数据库关系图
在对象资源管理器中,展开【数据库关系图】节点. 在对象资源管理器中,展开【数据库关系图】节点. 右击要重命名的数据库关系图,在弹出的快捷菜单中选择【 右击要重命名的数据库关系图,在弹出的快捷菜单中选择【 重命名】命令. 重命名】命令. 对象资源管理器中的关系图名称处变成了一个编辑框 .输入新的关系图名称,再按下Enter键.关系图就会以新 输入新的关系图名称,再按下 键 名称显示在对象资源管理器中. 名称显示在对象资源管理器中.
E10.1.3 E-R图的设计原则
怎样用E-R图准确的反映信息模型呢?E-R图设计方面 图准确的反映信息模型呢? 怎样用 图准确的反映信息模型呢 图设计方面 虽然没有一定的规则和技巧,但要大体遵循以下原则. 虽然没有一定的规则和技巧,但要大体遵循以下原则. (1)针对每一用户做出该用户信息的局部 )针对每一用户做出该用户信息的局部E-R图,确 图 定该用户视图的实体,属性和联系. 定该用户视图的实体,属性和联系. 注意:能作为属性的就不要作为实体, 注意:能作为属性的就不要作为实体,这样有利于简 化E-R图. 图 (2)综合局部 )综合局部E-R图,产生出总体 图 产生出总体E-R图. 图 注意:在综合的过程中,同名实体只能出现一次, 注意:在综合的过程中,同名实体只能出现一次,还 要去掉不必要的联系. 要去掉不必要的联系. 图不是唯一的, (3)一个系统的 )一个系统的E-R图不是唯一的,强调不同的侧面 图不是唯一的 做出的E-R图,可能有很大的不同. 做出的 图 可能有很大的不同.
第10章 文 件
龙诚数码：
2012-4-20
10.1 文件的概述
10.1.2 文件的打开与关闭 1. 文件打开函数fopen( ) 文件打开函数fopen(
12
常用的调用形式： 常用的调用形式： 调用形式 fp； FILE *fp； fopen(文件名 文件使用方式) 文件名, fp = fopen(文件名, 文件使用方式)； 文件名：需要打开的文件名称(字符串) 文件名：需要打开的文件名称(字符串)。 文件使用方式：是具有特定含义的符号 符号。 文件使用方式：是具有特定含义的符号。 函数功能： 函数功能：
龙诚数码：
5
2012-4-20
10.1 文件的概述
10.1.1 文件和文件指针 2. 文件的种类 例如将整数1949分别存储在这两种数据文件中。 1949分别存储在这两种数据文件中 例如将整数1949分别存储在这两种数据文件中。 ASCII文件：ASCII码 文件： 文件 码
龙诚数码：
7
2012-4-20
10.1 文件的概述
10.1.1 文件和文件指针 3. 缓冲文件和文件指针
系统对文件的处理过程就是 对文件进行输入 输出操作的过 输入/ 对文件进行 输入 / 输出 操作的过 程。 从文件读数据时， 从文件读数据时，先一次性 从磁盘文件中读取一批数据到 缓冲区， 缓冲区 ， 然后再从缓冲区逐个 将数据送入变量。 将数据送入变量。 向文件写数据时， 向文件写数据时，也是先将 变量中数据送到缓冲区， 变量中数据送到缓冲区 ， 待缓 冲区装满后 ， 再一起存到磁盘 文件中。 文件中。
按指定的文件使用方式打开指定的文件 按指定的文件使用方式打开指定的文件。 文件使用方式打开指定的文件。 若文件打开成功 成功， 若文件打开成功，为该文件分配一个文件缓冲区和一个 FILE类型变量 返回一个FILE类型指针 类型变量， FILE类型指针； FILE类型变量，返回一个FILE类型指针； 若文件打开失败 返回NULL 失败， NULL。 若文件打开失败，返回NULL。
高树芳C语言程序设计--第十章
[解决方案]定义结构体类型变量存储学生信息，
使用scanf从键盘输入数据，使用fprintf函数按格 式输出数据到文件（生成data3.txt文件）。
程序代码
10
10.2
文件的读写
相关知识：
1．文件的读写 2．格式化读写函数
11
10.2
文件的读写
[课堂训练10-1] 1．使用Windows的记事本建立一个文件，其 中写入15个任意整数，数据之间用逗号分隔。 编程输出该文件所有的奇数。 2．编程以只读方式打开案例10-3中的 data3.txt文件，在屏幕上输出所有学生的数 据。
第10章
文件
知识目标： 1. 理解文件和文件指针的概念 2．掌握文件的打开和关闭方法 3．掌握文件的读写操作 4．掌握文件的定位与随机读写操作
1
第10章 文件 能力目标： 1. 会打开和关闭文件 2．会对文件进行读写和定位等操作
本章内容： 文件的定义，文件型指针，文件的打开与关闭，文件 的读写，文件的定位与随机读写。
2
第10章 10.1 10.2 10.3 10.4
文件
文件的打开与关闭 文件的读写 文件的定位和随机读写 知识拓展
3
10.1 文件的打开与关闭
案例10-1
输出文件中的整数及其和
4
10.1 文件的打开与关闭
案例10-1 [案例任务]
输出文件中的整数及其和
使用Windows的记事本在磁盘上与C程序文件在同一目 录下建立一个文件名为“data1.txt”的文本文件(如 图10-1所示)，以空格、制表符或回车为分隔符输入 任意个整数,设计C程序，以只读方式打开此文件，若 该文件不存在，则输出“不能打开文件！”，若打开 成功，则输出所有整数，以及整数的个数和它们之和。
CATIA_V5教程-第10章__数字曲面设计
1-4
10.2.2 数据文件的输出
云点的坐标值可以用不同的格式存入数据文件中。保存数据 文件的步骤如下所示： （1）单击【云点输入】工具栏上的【输出】工具按钮，系 统弹出云点输出对话框。 （2）单击【元素】文本框，选择输出的云点； （3）单击按钮设置输出路径、文件名称、文件格式，如图 10.9所示； （4）在【轴系】下拉列表框设置输出数据文件的轴系； （5）单击【确定】按钮，完成云点的保存，保存后的文件 可以用“记事本”或“写字板”编辑输出的数据文件。
1-27
10.5.4 创建网格面边线
【建立自由边线】工具，是从识别出的网格边线生成一系列交线 的工具。 下面以如图所示网格面为例，讲解【建立自由边线】工具的使用 方法，具体操作步骤如下所示： （1）单击【创建扫描曲线】工具栏上的【建立自由边线】工具按 钮，系统弹出自由边线对话框。 （2）选择如图所示网格面； （3）在对话框中选择网格面边线的保存方式：①不同的：表示将 生成的每条交线单独保存；②群组：表示将生成的交线集体保 存； （4）选中【建立曲线】复选框，系统弹出从扫描得到曲线对话框 ，该对话框的使用方法参见“10.6.2节交线曲线”； （5）单击【确定】按钮，完成网格面边线的创建。
1-9
10.3.3 移除云点
【移除】工具，是对不需要的云点删除的工具，该操作是不 可逆的，只有重新加载才能恢复。单击该工具按钮，系 统弹出移除对话框，该对话框的内容与激活对话框的内 容完全相同，使用方法也和激活云点相同。
1-10
10.3.4 保留云点和特征线
【保护】工具，是对云点和特征线保护进行保护处理的工具 ，不受云点过滤和删除等操作的影响。单击该工具按钮 ，弹出保护对话框，选择被保护的云点，单击【确定】 按钮，完成云点的保护设置，如果对云点进行过滤或移 除，云点变成深绿色的不可编辑状态，如图所示。
第10章 文件-FORTRAN语言程序设计-王丽娟-清华大学出版社
顺序存取是指将文件的记录按建立的时间先后 顺序依次存放在存储介质中。
直接存取，又称随机存取。它是指将文件记录 由程序指定的某一位置直接存取。
顺序存取的文件中所有的记录长度可以完全不 同，而直接存取的文件中的记录的长度由 OPEN语句中的说明项“RECL=”指定，每个记 录长度相同。
OPEN(10,FILE="A.TXT",FORM="FORMATTED",& ACCESS="SEQUENTIAL") WRITE(10,100)911 WRITE(10,200) "WELCOME" OPEN(11,FILE="B.TXT",FORM="FORMATTED" , & ACCESS="DIRECT",RECL=10) WRITE(11,100,REC=1)911 WRITE(11,200,REC=2) "WELCOME" 100 FORMAT(1X,I5) 200 FORMAT(1X,A15) END
与说明项FILE=file共存，它只能用于由系统指定的
文件名，使该文件作为程序运行过程磁盘上和指定文件名同名 的文件。如果不存在这样的文件，则创建一个新文 件。
·UNKNOWN： 表示由计算机来规定文件的状态。
ACCESS=access。access是一个字符串表达式，此
文件的概念 文件的打开与关闭 文件的读写 其他文件操作
文件与记录 所有的数据来源和数据发送目标都被认为是文件。 文件有外部文件和内部文件之分。
记录是作为逻辑单位顺序排列的一组相关数据项 （又称字段）的集合，是构成文件的基本单位。 文件系统是负责存取和管理文件的公共信息管理机 构。
直接存取，又称随机存取。它是指将文件记录 由程序指定的某一位置直接存取。
顺序存取的文件中所有的记录长度可以完全不 同，而直接存取的文件中的记录的长度由 OPEN语句中的说明项“RECL=”指定，每个记 录长度相同。
OPEN(10,FILE="A.TXT",FORM="FORMATTED",& ACCESS="SEQUENTIAL") WRITE(10,100)911 WRITE(10,200) "WELCOME" OPEN(11,FILE="B.TXT",FORM="FORMATTED" , & ACCESS="DIRECT",RECL=10) WRITE(11,100,REC=1)911 WRITE(11,200,REC=2) "WELCOME" 100 FORMAT(1X,I5) 200 FORMAT(1X,A15) END
与说明项FILE=file共存，它只能用于由系统指定的
文件名，使该文件作为程序运行过程磁盘上和指定文件名同名 的文件。如果不存在这样的文件，则创建一个新文 件。
·UNKNOWN： 表示由计算机来规定文件的状态。
ACCESS=access。access是一个字符串表达式，此
文件的概念 文件的打开与关闭 文件的读写 其他文件操作
文件与记录 所有的数据来源和数据发送目标都被认为是文件。 文件有外部文件和内部文件之分。
记录是作为逻辑单位顺序排列的一组相关数据项 （又称字段）的集合，是构成文件的基本单位。 文件系统是负责存取和管理文件的公共信息管理机 构。
C语言第10章对文件的输入输出 ppt课件
程序中的输入输出都是通过操作系统进行 的 ➢“流”是一个传输通道，数据可以从运行 环境流入程序中，或从程序流至运行环境
PPT课件
11
10.1.1 什么是文件
➢从C程序的观点来看，无论程序一次读写 一个字符，或一行文字，或一个指定的数 据区，作为输入输出的各种文件或设备都 是统一以逻辑数据流的方式出现的。Ｃ语 言把文件看作是一个字符（或字节）的序 列。一个输入输出流就是一个字符流或字 节(内容为二进制数据)流。
PPT课件
20
10.1.3 文件的分类
ASCII形式
00110001 00110000 00110000 00110000 00110000
（1） （0） （0） （0） （0）
二进制形式
00000000 00000000 00100111 00010000
（10000）
PPT课件
21
10.1.4 文件缓冲区
的temp子目录下面
PPT课件
15
10.1.2 文件名
➢文件路径表示文文件件在名外部存储设备中的位 置。如：
D: \CC\temp\file1.dat 表示file1.dat文件存放在D盘中的CC目录下
的temp子目录下面
PPT课件
16
10.1.2 文件名
➢文件路径表示文命 识件名 符在规 的外则 命部遵 名存循 规储标 则设备中的位 置。如：
➢“文件”指存储在外部介质上数据的集合
一批数据是以文件的形式存放在外部介质上的 操作系统是以文件为单位对数据进行管理 想找存放在外部介质上的数据，先按文件名找
到所指定的文件，然后再从该文件读数据 要向外部介质上存储数据也必须先建立一个文
件（以文件名作为标志），才能向它输出数据
PPT课件
11
10.1.1 什么是文件
➢从C程序的观点来看，无论程序一次读写 一个字符，或一行文字，或一个指定的数 据区，作为输入输出的各种文件或设备都 是统一以逻辑数据流的方式出现的。Ｃ语 言把文件看作是一个字符（或字节）的序 列。一个输入输出流就是一个字符流或字 节(内容为二进制数据)流。
PPT课件
20
10.1.3 文件的分类
ASCII形式
00110001 00110000 00110000 00110000 00110000
（1） （0） （0） （0） （0）
二进制形式
00000000 00000000 00100111 00010000
（10000）
PPT课件
21
10.1.4 文件缓冲区
的temp子目录下面
PPT课件
15
10.1.2 文件名
➢文件路径表示文文件件在名外部存储设备中的位 置。如：
D: \CC\temp\file1.dat 表示file1.dat文件存放在D盘中的CC目录下
的temp子目录下面
PPT课件
16
10.1.2 文件名
➢文件路径表示文命 识件名 符在规 的外则 命部遵 名存循 规储标 则设备中的位 置。如：
➢“文件”指存储在外部介质上数据的集合
一批数据是以文件的形式存放在外部介质上的 操作系统是以文件为单位对数据进行管理 想找存放在外部介质上的数据，先按文件名找
到所指定的文件，然后再从该文件读数据 要向外部介质上存储数据也必须先建立一个文
件（以文件名作为标志），才能向它输出数据
第10章 文件系统接口
如下：
FileLock lock(long begin, long end, boolean shared) Shared = true, 共享锁 Shared = false, 排他所
释放锁： FileLock 的Release()。
12
Operating Systems
File 加锁例子 – Java API
26
Operating Systems
目录操作
搜索文件 创建文件 删除文件
列出目录
重命名文件 跟踪文件系统
27
Operating Systems
目录逻辑结构的组织方法
有效：迅速定位文件 命名：方便用户
两个不同的用户的文件名称可以相同 同一文件可以有不同的名称
访问模式：创建，只读，读写，添加等； 打开文件表（Create和Delete除外）
打开文件，并返回指向一个条目的指针。
进程打开文件表：文件指针，存取权限； 系统打开文件表：磁盘位臵，访问日期，文件大 小等。
Close(Fi)：将内存中的Fi的内容复制到位于磁 盘上的目录结构中。
9
Operating Systems
一系列代码段，以供装入程序调入内存执行。
4
Operating Systems
文件属性
名称：有些OS区分大小写（如Linux，Unix），有些
不区分（如DOS, Windows） 类型：由OS和程序定义 位臵：指向设备和设备上文件位臵的指针 大小 保护：决定读、写、执行等的访问控制信息 时间、日期和用户标识：文件创建、上次修改和上次 访问都可能有该信息。用于保护、安全和使用跟踪 文件的信息被保存在目录结构中，而目录结构也保存 在外存上
IRIG106第10章数据流实时及事后处理时效分析
实时 处理 ，也 可 以在任 务结 束后 对数 据进 行事后 处 理 。
数 据校 验 和 ， 通 常是 ３ ２ 位 队列 宽度 ， 如果 数 据检 验存 在 的话 ， 其 长度 可 以是 ８ 位，１ ６ 位 ，或者 ３ ２ 位。
一
、
数据流和数据文件格式基础
二、标 准数 据包类型
Ｉ Ｒ Ｉ Ｇ一 １ ０ ６第 １ ０章 包 含 对 每 个 支 持 数 据类 型 的格 式 说
据 包 的类 型息 息 相 关 ，其 中 的一 些 有 具 体 的数 据 字 ，子 包 时 间 标 签 和子 包 包 头 。包 尾 通 常 是 用来 提 供 一 个 可 选 择 的
回放 系统 对 其进 行 分析 。这 些 第 １ ０章 的接 口标 准 定义 是 在 Ｓ Ｔ Ａ Ｎ Ｇ ４ ５ ７ ５的基 础上 进行 更改 而制 定 的 。 第 １ ０ 章 所制 定 的标 准 数据 可 以在 进行 存 储 的 同时进 行
标记 ，其他数据类型在其子包 中的包头和子包内的每个数
据单元 中都有 时 间标 记 。 时 间数 据包 通 过 包 头 内置 独立 运 行 的 １ ０ ＭＨ ｚ 相 对 时 间 计 时 器 把绝 对 时 间 和 对 应 的数 据 采 集 时 间关 联 起 来 ，如 果
一
个 标 准 的第 １ ０章实 时 数据 流 或者 数据 流 文件 是 由符 明 ，其 中，有 的数 据类 型其 每 个 数 据 子 包 中 只有 一 次 时 间
合各 种 数据 标 准 的数 据包 组 成 的 。在 以第 １ Ｏ 章数 据 包 为单
位 的格 式 中 ，第一 个 子包 是 Ｉ ＲＩ Ｇ 一 １ ０ ６第 ９章 所 定义 的遥测 属 性标 准 安 装 包 ，它包 含 着 元 数 据 的 目的地 址 和 数 据 的来
数 据校 验 和 ， 通 常是 ３ ２ 位 队列 宽度 ， 如果 数 据检 验存 在 的话 ， 其 长度 可 以是 ８ 位，１ ６ 位 ，或者 ３ ２ 位。
一
、
数据流和数据文件格式基础
二、标 准数 据包类型
Ｉ Ｒ Ｉ Ｇ一 １ ０ ６第 １ ０章 包 含 对 每 个 支 持 数 据类 型 的格 式 说
据 包 的类 型息 息 相 关 ，其 中 的一 些 有 具 体 的数 据 字 ，子 包 时 间 标 签 和子 包 包 头 。包 尾 通 常 是 用来 提 供 一 个 可 选 择 的
回放 系统 对 其进 行 分析 。这 些 第 １ ０章 的接 口标 准 定义 是 在 Ｓ Ｔ Ａ Ｎ Ｇ ４ ５ ７ ５的基 础上 进行 更改 而制 定 的 。 第 １ ０ 章 所制 定 的标 准 数据 可 以在 进行 存 储 的 同时进 行
标记 ，其他数据类型在其子包 中的包头和子包内的每个数
据单元 中都有 时 间标 记 。 时 间数 据包 通 过 包 头 内置 独立 运 行 的 １ ０ ＭＨ ｚ 相 对 时 间 计 时 器 把绝 对 时 间 和 对 应 的数 据 采 集 时 间关 联 起 来 ，如 果
一
个 标 准 的第 １ ０章实 时 数据 流 或者 数据 流 文件 是 由符 明 ，其 中，有 的数 据类 型其 每 个 数 据 子 包 中 只有 一 次 时 间
合各 种 数据 标 准 的数 据包 组 成 的 。在 以第 １ Ｏ 章数 据 包 为单
位 的格 式 中 ，第一 个 子包 是 Ｉ ＲＩ Ｇ 一 １ ０ ６第 ９章 所 定义 的遥测 属 性标 准 安 装 包 ，它包 含 着 元 数 据 的 目的地 址 和 数 据 的来
10.文件
输入文件缓冲区 输入 程序数据区 输出 输出文件缓冲区 磁盘文件
2 文件类型指针
缓冲文件系统中,关键的概念是"文件指针" 缓冲文件系统中,关键的概念是"文件指针". 每个被使用的文件都在内存中开辟一个相应的文件 每个被使用的文件都在内存中开辟一个相应的文件 信息区,用来存放文件的有关信息(如文件的名字, 信息区,用来存放文件的有关信息(如文件的名字, 文件状态及文件当前位置等). ).这些信息是保存在 文件状态及文件当前位置等).这些信息是保存在 一个结构体变量中的. 一个结构体变量中的.该结构体类型是由系统声明 取名为FILE FILE. 的,取名为FILE. 定义FILE结构体类型的信息包含在头文件stdio.h 定义FILE结构体类型的信息包含在头文件stdio.h FILE结构体类型的信息包含在头文件 在程序中可以直接用FILE类型名定义变量. FILE类型名定义变量 中.在程序中可以直接用FILE类型名定义变量.每 一个FILE类型变量对应一个文件的信息区, FILE类型变量对应一个文件的信息区 一个FILE类型变量对应一个文件的信息区,其中包 含该文件的有关信息. 含该文件的有关信息.
3 文件的打开与关闭
文件的打开(fopen函数) (fopen函数 一.文件的打开(fopen函数) fopen函数的调用方式通常为: fopen函数的调用方式通常为: 函数的调用方式通常为 fopen(文件名,使用文件方式); fopen(文件名,使用文件方式); 例如: 例如: fopen("a1 a1", r ); fopen( a1 , "r"); 表示要打开名字为a1的文件,使用文件方式为"读入" a1的文件 表示要打开名字为a1的文件,使用文件方式为"读入". fopen函数的返回值是指向a1文件的指针 函数的返回值是指向a1文件的指针( a1文件信 fopen函数的返回值是指向a1文件的指针(即a1文件信 息区的起始地址).通常将fopen ).通常将fopen函数的返回值赋给一 息区的起始地址).通常将fopen函数的返回值赋给一 个指向文件的指针变量. 个指向文件的指针变量.
2 文件类型指针
缓冲文件系统中,关键的概念是"文件指针" 缓冲文件系统中,关键的概念是"文件指针". 每个被使用的文件都在内存中开辟一个相应的文件 每个被使用的文件都在内存中开辟一个相应的文件 信息区,用来存放文件的有关信息(如文件的名字, 信息区,用来存放文件的有关信息(如文件的名字, 文件状态及文件当前位置等). ).这些信息是保存在 文件状态及文件当前位置等).这些信息是保存在 一个结构体变量中的. 一个结构体变量中的.该结构体类型是由系统声明 取名为FILE FILE. 的,取名为FILE. 定义FILE结构体类型的信息包含在头文件stdio.h 定义FILE结构体类型的信息包含在头文件stdio.h FILE结构体类型的信息包含在头文件 在程序中可以直接用FILE类型名定义变量. FILE类型名定义变量 中.在程序中可以直接用FILE类型名定义变量.每 一个FILE类型变量对应一个文件的信息区, FILE类型变量对应一个文件的信息区 一个FILE类型变量对应一个文件的信息区,其中包 含该文件的有关信息. 含该文件的有关信息.
3 文件的打开与关闭
文件的打开(fopen函数) (fopen函数 一.文件的打开(fopen函数) fopen函数的调用方式通常为: fopen函数的调用方式通常为: 函数的调用方式通常为 fopen(文件名,使用文件方式); fopen(文件名,使用文件方式); 例如: 例如: fopen("a1 a1", r ); fopen( a1 , "r"); 表示要打开名字为a1的文件,使用文件方式为"读入" a1的文件 表示要打开名字为a1的文件,使用文件方式为"读入". fopen函数的返回值是指向a1文件的指针 函数的返回值是指向a1文件的指针( a1文件信 fopen函数的返回值是指向a1文件的指针(即a1文件信 息区的起始地址).通常将fopen ).通常将fopen函数的返回值赋给一 息区的起始地址).通常将fopen函数的返回值赋给一 个指向文件的指针变量. 个指向文件的指针变量.
《统计分析与SPSS的应用(第五版)》课后练习答案(第10章)
《统计分析与S P S S的应用（第五版）》（薛薇）课后练习答案第10章SPSS的聚类分析1、根据“高校科研研究.sav”数据，利用层次聚类分析对各省市的高校科研情况进行层次聚类分析。
要求：1）根据凝聚状态表利用碎石图对聚类类数进行研究。
2）绘制聚类树形图，说明哪些省市聚在一起。
3）绘制各类的科研指标的均值对比图。
4）利用方差分析方法分析各类在哪些科研指标上存在显著差异。
采用欧氏距离，组间平均链锁法利用凝聚状态表中的组间距离和对应的组数，回归散点图，得到碎石图。
大约聚成4类。
步骤：分析→分类→系统聚类→按如下方式设置……结果：凝聚计划阶段组合的集群系数首次出现阶段集群下一个阶段集群 1 集群 2 集群 1 集群 21 26 30 328.189 0 0 22 26 29 638.295 1 0 73 20 25 1053.423 0 0 54 4 12 1209.922 0 0 155 8 20 1505.035 0 3 66 8 16 1760.170 5 0 97 24 26 1831.926 0 2 108 7 11 1929.891 0 0 119 5 8 2302.024 0 6 2210 24 31 2487.209 7 0 2211 2 7 2709.887 0 8 1612 22 28 2897.106 0 0 1913 6 23 2916.551 0 0 1714 10 19 3280.752 0 0 2515 4 21 3491.585 4 0 2116 2 3 4229.375 11 0 2117 6 13 4612.423 13 0 2018 9 18 5377.253 0 0 2519 14 22 5622.415 0 12 2420 6 15 5933.518 17 0 2321 2 4 6827.276 16 15 2622 5 24 7930.765 9 10 2423 6 27 9475.498 20 0 2624 5 14 14959.704 22 19 2825 9 10 19623.050 18 14 2726 2 6 24042.669 21 23 2827 9 17 32829.466 25 0 2928 2 5 48360.854 26 24 2929 2 9 91313.530 28 27 3030 1 2 293834.503 0 29 0将系数复制下来后，在EXCEL中建立工作表。
919140-C语言程序设计教程——面向计算思维和问题求解-第10章-新
并显示在屏幕上。 3. 关闭“古诗.txt”文件。
程序设计：
#include<stdio.h> #include<stdlib.h>
void main( )
{
FILE *fp;
char str[30]; /* 用于存储一行古诗 */
fp =fopen("d:/古诗.txt", "r");
if(fp==NULL)
“ab+”（读写）
以读写方式打开二进制文件。可读取数据和向文件尾部添加数据，原 文件内容保留。
例如，以“只读”方式打开文件pressure.dat，并用文件来自 针fp指向该文件的语句如下：
FILE *fp; fp=fopen(“pressure.dat”, “r”);
注意：在打开文件时应该判断文件打开是否成功。 例如：
二进制文件：二进制文件是指把数据按其在内存中的 存储形式原样存储到磁盘上所形成的二进制数据文件。 由于编码不同，二进制文件用文本处理软件打开会出 现乱码。
文件指针：指向文件的指针变量。用于建立缓冲文件 系统与特定文件的关联。 定义一个文件指针的格式：FILE *指针名；
其中，FILE是在stdio.h中定义的结构体类型，封 装了与文件有关的信息。 在定义文件指针时，最好将文件指针指向空。 如：FILE *fp=NULL;
语言程序设计教程
面向计算思维和问题求解
第10章 数据的文件管理
文件概述 文件的打开与关闭 文本文件的读写 二进制文件的读写 文件的定位 文件的更新
10.1.1 问题描述
信用卡是当今发展最快的一种集金融业务和电脑技术 于一体的高科技产物。具有支付和信贷等功能。模拟信用 卡帐户管理设计一个简易帐户信息管理系统，主要管理帐 号、姓名、余额三项内容。具体操作有：添加帐户、删除 帐户、更新帐户信息以及列出当前全部帐户信息等。
程序设计：
#include<stdio.h> #include<stdlib.h>
void main( )
{
FILE *fp;
char str[30]; /* 用于存储一行古诗 */
fp =fopen("d:/古诗.txt", "r");
if(fp==NULL)
“ab+”（读写）
以读写方式打开二进制文件。可读取数据和向文件尾部添加数据，原 文件内容保留。
例如，以“只读”方式打开文件pressure.dat，并用文件来自 针fp指向该文件的语句如下：
FILE *fp; fp=fopen(“pressure.dat”, “r”);
注意：在打开文件时应该判断文件打开是否成功。 例如：
二进制文件：二进制文件是指把数据按其在内存中的 存储形式原样存储到磁盘上所形成的二进制数据文件。 由于编码不同，二进制文件用文本处理软件打开会出 现乱码。
文件指针：指向文件的指针变量。用于建立缓冲文件 系统与特定文件的关联。 定义一个文件指针的格式：FILE *指针名；
其中，FILE是在stdio.h中定义的结构体类型，封 装了与文件有关的信息。 在定义文件指针时，最好将文件指针指向空。 如：FILE *fp=NULL;
语言程序设计教程
面向计算思维和问题求解
第10章 数据的文件管理
文件概述 文件的打开与关闭 文本文件的读写 二进制文件的读写 文件的定位 文件的更新
10.1.1 问题描述
信用卡是当今发展最快的一种集金融业务和电脑技术 于一体的高科技产物。具有支付和信贷等功能。模拟信用 卡帐户管理设计一个简易帐户信息管理系统，主要管理帐 号、姓名、余额三项内容。具体操作有：添加帐户、删除 帐户、更新帐户信息以及列出当前全部帐户信息等。
第10章单因素方差分析
第10章单因素方差分析单因素方差分析(0ne-Way ANOV A)，又称一维方差分析，它能够对单因素多个独立样本的均数进行比较，可以用10种检验方法对变量间的均数进行两两比较(即多重比较检验)并给出方差分析表，还可以作出5种类型图形(Type of plots)和2种均数图形(Means plot options)10.1 单因素方差分析的计量资料[例10—1] 某社区随机抽取了30名糖尿病患者、IGT异常人和正常人进行载脂蛋白(mg／dL)测定，结果示于表10—1。
试问3组人群的载脂蛋白测定结果含量是否相同？(倪宗瓒．卫生统计学．第4版，北京：人民卫生出版社，2001.50)本例是一个完全随机设计的单因素方差分析。
已建立SAS数据集文件并保存Sasuser.onewav4。
(1)进入SAS／Win(v8)系统，单击Solutions－Analysis－Analyst，得到分析家窗口。
(2)单击File-open By SAS Name—Sasuser-0neway4—0K，调入数据文件。
(3)在“分析家”窗口单击Statistics-ANOV A-One way ANOV A，得到图10—1所示对话框。
本例因变量(Dependent)为A(载脂蛋白)，单击A—Dependent。
自变量(1ndependent)：B(3种人的组别)，单击B—Independent 。
图10.1 0ne—way ANOV A：0neway4(单因素方差分析)对话框(4)单击Tests按钮，得到图10—2所示对话框。
在此对话框的ANOV A(F—检验)选项中可进行如下设置。
Analysis of variance，方差分析。
Welch’s variance-weighted ANOV A，威尔奇方差—权重方差分析。
Tests for equal variance，相等方差检验，即方差齐性检验。
Barlett’s test，巴特尼特检验。
c语言第10章文件练习题
fclose(f1）; fclose(f2）;} 5. 以下程序中用户由键盘输入一个文件名，然后输入一串字符（用#结束输入）存放到此
文件文件中形成文本文件，并将字符的个数写到文件尾部，请填空。 #include<stdio.h> main( ） {
FILE *fp； char ch，fname[32]； int count=0； printf("Inputthefilename："）； scanf("%s"，fname）； if((fp=fopen(【1】，"w+"））==NULL） {printf("Can'topenfile：%s\n"，fname）； exit(0）；} printf("Enterdata：\n"）； while((ch=getchar(））!="#"） { fputc(ch，fp）； count++；} fprintf(【2】 ，"\n%d\n"， count）； fclose(fp）； } 6. 以下程序的功能是：从键盘上输入一个字符串,把该字符串中的小写字母转换为大写字 母,输出到文件 test.txt中,然后从该文件读出字符串并显示出来。请填空。 #include<stdio.h> main(） {
第 10章 文件练习题
一、 选择题
1. 对 C语言的文件存取方式中，文件(）。
A.只能顺序存取
B.只能随机存取（也称直接存取）
C.可以是顺序存取，也可以是随机存取
D.只能从文件的开头存取
2. C语言可以处理的文件类型是(）。
A.文本文件和数据文件
B.文本文件和二进制文件
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
3.设置控件属性
4.编写程序代码
a.代码分析 课堂任务“摇奖程序”程序代码设计较为简单，要求通过 DriveListBox控件、DirListBox控件和FileListBox实现对盘符、 文件夹和文件的选择，最终实现文件的数据的输入，单击 “摇奖”按钮，程序将从数据输入文件中开始抽取摇奖数据， 并不断显示所抽取的摇奖数据，单击“停止”，程序将在 Textbox控件的文本框内显示摇奖结果。程序代码段应包含 摇奖按钮事件、停止按钮事件、窗体加载事件、盘符改变事 件、时间控制事件和目录改变事件
5.归纳与提高 一般情况下，驱动器列表框控件DriveListBox、目录列表 框控件DirListBox与文件列表框控件FileListBox三种控件经常 一起工作。而要使这三个控件协同工作也很简单，用户只要 为驱动器列表框的Change事件建立一个过程，当用户选择新 的驱动器时就会执行这个事件过程，这个过程将改变目录列 表框的路径以符合新选择的驱动器；同时，用户再为目录列 表框的Change事件建立一个过程，当用户选择新的目录时激 发该事件，并改变文件列表框以符合新的目录路径。通过上 述的两个过程，三个控件就可以同步工作了。
‘停止
‘窗体加载 ‘计时器停止
‘盘符的改变事件发生时 ‘更改相应目录wjj的路径
‘产生1到cc间的随机数 ‘text1中显示number(i)的内容
‘更改文件列表wj的路径
5.课后练习：
练习1：
在理解掌握本课课业设计的基础上，独立完成“摇奖程序”。
b.具体代码分析
‘通用声明处定义的变量，在每个过程中都有效 Dim Cc As Integer ‘设置参加摇奖的人数变量cc ‘设置用于保存参加摇奖的各人的资料(比如姓名或号码 )的数组变量 Dim Number(100) As String ‘摇奖按钮事件 Private Sub Command1_Click() FileName = wj.Path & "\" & wj.FileName ‘变量FileName中得到包含输入 数据的文件名 ‘打开文件FileName，文件的内容通过1号输入缓冲区输入 Open FileName For Input As #1 For i = 1 To 100 ‘从1号缓冲区中输入文件中的第i行至变量number(i)中 Line Input #1, Number(i) If EOF(1) Then Exit For ‘若文件结束,则退出循环 Next Close ‘关闭文件 Cc = i ‘参加摇奖的总数为cc Timer1.Enabled = True ‘开始摇奖 End Sub
6.课后练习： 练习1：在理解掌握本课课业设计的基础上，独立完成 “读取与修改文件属性”。 练习2：用VB编写一个“媒体浏览器”程序。具体设计 界面如图 所示。
第35课——文件的输入输出
--制作“摇奖程序”小程序，学习文件的输入输出
1．任务分析 a.本任务需要用到1个Textbox控件、1个Timer控件、1个 DriveListBox控件、1个DirListBox控件、1个FileListBox控 件、、2个CommandButton控件和3个Lable控件。 b.程序设计要求，加载“摇奖程序”，选择摇奖数据文件， 单击“摇奖”按钮，程序将不停的从摇奖数据文件中抽取 摇奖数据并显示在文本框中，直到单击“停止”按钮为止。
b.代码分析 Private Sub Command1_Click() Dim f As Integer f = GetAttr(Dir1.Path & "\" & File1.FileName) If (f And 1) = 1 Then Check1.Value = Checked Else Check1.Value = Unchecked End If If (f And 2) = 2 Then Check2.Value = Checked Else Check2.Value = Unchecked End If If (f And 32) = 32 Then Check3.Value = Checked Else Check3.Value = Unchecked End If End Sub
清 华 版
第34课 文件系统控件DriveListBox、DirListBox 与FileListBox
任务1：修改文件属性，学习文件系统控件 DriveListBox、DirListBox与FileListBox
1．任务分析 a. 本任务需要用到1个Label控件、1个CommandButton 控件和2个TextBox控件； b. 程序设计要求，在text1文本框内输入任意位数的 密码时，单击“开始猜测”按钮，程序将所输入的 密码显示在text2文本框内；
3.设置控件属性
4.编写程序代码
a.程序分析 课堂任务“读取与修改文件属性”程序代码设计编写要 求，通过DriveListBox控件、DirListBox控件和FileListBox控 件，选择该文件夹中的任意一个文件，单击“读取”按钮， 则程序需将显示出该文件的属性(只读、隐藏和存档)，修改 该文件的属性(只读、隐藏和存档)，单击“修改”按钮，则 文件的属性将相应改变。
2.设计程序界面 此程序的界面需要添加1个Frame控件、1个DriveListBox控件、 1个DirListBox控件、1个FileListBox控件、2个CommandButton 控件和3个CheckBox控件，Frame控件把DriveListBox控件， DirListBox控件和FileListBox控件放在一起，3个CheckBox控件 分别设置只读，隐藏和存档复选按钮，CommandButton控件分 别设置“读取”，“修改”按钮。
‘停止按钮事件 Private Sub Command2_Click() Timer1.Enabled = False End Sub Private Sub Form_Load() Timer1.Enabled = False End Sub Private Sub Pan_Change() wjj.Path = Pan.Drive End Sub ‘计时器timer1的时间到时 Private Sub Timer1_Timer() i = Int(Rnd * Cc) + 1 Text1.Text = Number(i) End Sub ’目录wjj改变 Private Sub WJJ_Change() wj.Path = wjj.Path End Sub
2.设计程序界面
此程序的界面需要添加1个Textbox控件、1个Timer控件、1 个DriveListBox控件、1个DirListBox控件、1个FileListBox控 件、2个CommandButton控件和3个Lable控件。通过 DriveListBox控件、DirListBox控件和FileListBox控件有机的 结合选择摇奖数据，实现文件的输入；CommandButton控件 分别设置“摇奖”和“停止”按钮；Lable控件用于标题说明； Textbox控件用于显示摇奖结果。
‘修改按钮的单击事件发生时 Private Sub Command2_Click() Dim f As Integer ‘文件的总体属性值 f = 0 If Check1.Value = Checked Then f = f + 1 ‘只读 If Check2.Value = Checked Then f = f + 2 ‘隐藏 If Check3.Value = Checked Then f = f + 32 ‘存档 SetAttr Dir1.Path & "\" & File1.FileName, f ‘设置文件的属性 End Sub Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub Private Sub Drive1_Change() Dir1.Path = Drive1.Drive End Sub ‘目录改变时 ‘文件列表file1的路径为目录dir1的路径 ‘磁盘改变时 ‘目录dir1的路径磁盘drive1的路径