第九届R会议R语言与3D打印相结合的教育应用.ppt

R语言与3D打印相结合的教育应用 R3D打印在教育中的碰撞 R在教育中的应用案例 总结与展望 内容 1 2 3 R语言r2stl工具包 r2stl, R package for visualizing data using a 3D printer Package r2stl converts R data to STL (stereolithography) files that can be used to feed a 3-dimensional printer. ——Ian Walker and Jose Gama,2015 1.Persp（）函数，绘制三维空间中二元函数的立体图； 2. z 并不是x 和y 的简单运算，而是要在函数f 关系下作外积运算(outer(x,y,f))，形成网格，才能绘出三维图形； z-outer(x,y,f) 3.封装Persp函数，直接生成可3D打印的.stl源文件。 R语言r2stl工具包 3D打印 中共中央政治局委员、上海市委书记韩正在德国大众汽车集团察看运用3D打印技术制作的新能源汽车零部件 3D打印 3D打印作品 3D打印技术 　　3D打印是一种快速成型技术，是采用数字技术材料如3D建模软件、计算机辅助摄影成像等通过逐层打印的方式来建造物体。3D打印技术在教育领域的一个主要应用是，使得学生能够更加真实地接触教学中那些难以展现的物体或者概念。 　　利用3D打印，数学课上，图表和数学模型可以立体地呈现出来；地理课上，学生可以更容易理解地质构造。通过该技术，学生也能体验到更加真实的学习。 数学函数的学习 1.已知ax+by-cz=0 ,x∈[-10，10]，y∈[-10，10]，（a,b,c为常数，且均不为0）。请绘制出x,y,z所构成的三维图形 2.已知ax2-by2-cz=0, x∈[-10，10]，y∈[-10，10]，（a,b,c为常数，且均不为0 ）。请绘制出x,y,z所构成的三维图形 数学函数的学习 随着坐标系以及向量代数在中学课堂的引入，导致学生的空间想象能力大不如前，通过3d打印技术可以形象的描述每个空间结构体形状，给人一种既视感，提高学生的空间想象能力，对于后续几何类课程的学习有较大帮助。 R在教育中的应用 基础教育 基本的函数和几何图形 高等教育 二重积分，三重积分，曲面积分 数学函数 几何图形 实物模型 数学 教育 3D 打印 数学函数 R r2stl工具包的应用 三维图形打印出实物模型 逻辑思维和空间想象能力 R在教育中的应用 ###建立三棱柱的立体模型 x - seq(1, 10, length= 100) y - x f - function(x,y) { r - x+y-y;r} z - outer(x, y, f) r2stl(x, y, z, filename=“d://sanlengzhu.stl, show.persp=TRUE) R在教育中的应用案例 ###截取一个平面（初中典型） x - seq(-10, 10, length= 100) y - x f - function(x,y) { r - x+y;r} z - outer(x, y, f) # z - outer(x, y, “+”) r2stl(x, y, z, filename=“jiemian.stl, show.persp=TRUE) R在教育中的应用案例 ###截取一个平面（初中典型） x - seq(-10, 10, length= 100) y - x f - function(x,y) { r - x+y;r} z - outer(x, y, f) # z - outer(x, y, “+”) 即z-outer(1:100,1:100,”+”) #数组的外积运算 R在教育中的应用案例 ###建立马鞍面的立体模型 x - seq(-10, 10, length= 100) y - x f - function(x,y) {x^2-y^2} z - outer(x, y, f) r2stl(x, y, z, filename=“d://maanmian.stl, show.persp=TRUE) R在教育中的应用案例 ###椭圆抛物面1 x - seq(-10, 10, length= 100) y - x f - function(x,y) { sqrt(100-x^2-y^2) } z