| 查看: 3414 | 回复: 15 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[交流]
立方晶胞密堆积的matlab程序 已有7人参与
|
|||
有没有喜欢matlab的虫友 哈哈 小弟写了个简单小程序 跟大家切磋一下哈 水平不高 请见谅 如有错误 请赐教  立方晶胞密堆积.jpg |
回复此楼» 本帖已获得的红花（最新10朵）
王雨辰phy» 猜你喜欢
建议基金发布提前给出明确的时间点
已经有14人回复
-
范进中举一文的中心思想
已经有5人回复
-
2026国自然函评费到账
已经有17人回复
-
让我中一个面上吧！
已经有15人回复
-
2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战
已经有5人回复
-
跳槽后在研项目怎么办？
已经有10人回复
-
什么时候开奖？
已经有10人回复
-
今天放榜吗？
已经有16人回复
-
93BebMhtakh前后11位开头都是大写
已经有8人回复
-
只有每年这种时候来逛逛小木虫
已经有26人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 请问，这个三角形里面有个“1”是什么意思？
已经有3人回复
- 微球 SEM 想观察切面，怎么处理样品能获得切面呢？
已经有5人回复
- 谁有MATLAB2013b的安装密匙呀
已经有11人回复
- 如何从密堆积机构想到面心立方晶胞？
已经有5人回复
|
clc,clear all %主函数 input('请输入1-4之内的整数，然后按enter') ni=input('ni='); ni=ni-1; nj=input('nj='); nj=nj-1; nk=input('nk='); nk=nk-1; hold on for i=0:ni; for j=0:nj; for k=0:nk; bodycube(i,j,k) end end end hold off function bodycube(i,j,k) r=.1*sqrt(3)/4; balls(r,.1/2+0.1*i,.1/2+0.1*j,.1/2+0.1*k); hold on balls(r,0+0.1*i,0+0.1*j,0+0.1*k); balls(r,0+0.1*i,.1+0.1*j,0+0.1*k); balls(r,.1+0.1*i,.1+0.1*j,0+0.1*k); balls(r,.1+0.1*i,0+0.1*j,0+0.1*k); balls(r,0+0.1*i,0+0.1*j,.1+0.1*k); balls(r,0+0.1*i,.1+0.1*j,.1+0.1*k); balls(r,.1+0.1*i,.1+0.1*j,.1+0.1*k); balls(r,.1+0.1*i,0+0.1*j,.1+0.1*k); axis equal axis off colormap([.2 0.2 1]);  只能这样了 |
8楼2015-07-05 22:55:09
2楼2015-07-04 23:15:12
zhswee
铁杆木虫 (著名写手)
- 应助: 130 (高中生)
- 金币: 6195.7
- 散金: 400
- 红花: 19
- 帖子: 2416
- 在线: 398.7小时
- 虫号: 2658798
- 注册: 2013-09-16
- 专业: 力学
3楼2015-07-04 23:28:54
magicmonk
至尊木虫 (著名写手)
- 应助: 172 (高中生)
- 金币: 11451.3
- 红花: 24
- 帖子: 1124
- 在线: 3108.8小时
- 虫号: 1191315
- 注册: 2011-01-17
- 专业: 理论和计算化学
4楼2015-07-05 12:12:22
