24小时热门版块排行榜    

查看: 3454  |  回复: 15

l53867

金虫 (小有名气)

[交流] 立方晶胞密堆积的matlab程序 已有7人参与

有没有喜欢matlab的虫友  哈哈 小弟写了个简单小程序 跟大家切磋一下哈 水平不高 请见谅 如有错误  请赐教

立方晶胞密堆积的matlab程序
立方晶胞密堆积.jpg
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

王雨辰phy

木虫 (小有名气)

老菜鸟


小木虫: 金币+0.5, 给个红包,谢谢回帖
送红花一朵
哇哦,不知道能不能再传一下呢,一直对编程建模不是很在行,希望能多多交流
我之前偶然看到国外的有人直接用matlab建余弦函数表面形貌的模型,不知道楼主会不会操作呢
立方晶胞密堆积的matlab程序-1
VJH9ZMMW15]Y3Z0]P1T6D]O.png

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : 2013-CEAS-REU_Project3_NanoEngineering_Final-Presentation.pptx
  • 2015-07-05 22:16:14, 9.04 M
但行好事,莫问前程
6楼2015-07-05 22:17:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

l53867

金虫 (小有名气)

引用回帖:
3楼: Originally posted by zhswee at 2015-07-04 23:28:54
鼓励

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
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

王雨辰phy

木虫 (小有名气)

老菜鸟


小木虫: 金币+0.5, 给个红包,谢谢回帖
引用回帖:
8楼: Originally posted by l53867 at 2015-07-05 22:55:09
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;
         ...

楼主的balls函数没有写上去吧
function balls(r,x,y,z)
[X,Y,Z]=sphere();
X=x+r*X;
Y=y+r*Y;
Z=z+r*Z;
surf(X,Y,Z);
colormap([0 0 1]);

» 本帖已获得的红花(最新10朵)

但行好事,莫问前程
9楼2015-07-06 11:12:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

l53867

金虫 (小有名气)

为什么附件穿不上去
2楼2015-07-04 23:15:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhswee

铁杆木虫 (著名写手)

鼓励

[ 发自小木虫客户端 ]
3楼2015-07-04 23:28:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

magicmonk

至尊木虫 (著名写手)

上传到百度云吧
我们最深的恐惧不是我们能力不够,我们最深的恐惧是能力超越了极限。
4楼2015-07-05 12:12:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wzm9525

银虫 (小有名气)

前排小板凳

[ 发自小木虫客户端 ]
倔强不是好事情,可是我们如何分得清何为倔强何为执著
5楼2015-07-05 12:29:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

l53867

金虫 (小有名气)

引用回帖:
6楼: Originally posted by 王雨辰phy at 2015-07-05 22:17:03
哇哦,不知道能不能再传一下呢,一直对编程建模不是很在行,希望能多多交流
我之前偶然看到国外的有人直接用matlab建余弦函数表面形貌的模型,不知道楼主会不会操作呢

VJH9ZMMW15]Y3Z0]P1T6D]O.png
...

俺暂时还是草鸟级别。。你说的有点高深,不过我会继续努力的
7楼2015-07-05 22:45:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

l53867

金虫 (小有名气)

送红花一朵
引用回帖:
9楼: Originally posted by 王雨辰phy at 2015-07-06 11:12:29
楼主的balls函数没有写上去吧
function balls(r,x,y,z)
=sphere();
X=x+r*X;
Y=y+r*Y;
Z=z+r*Z;
surf(X,Y,Z);
colormap();...

丢。。把红花再还给你吧

[ 发自小木虫客户端 ]
10楼2015-07-06 12:14:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 l53867 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[博后之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +7 QUjhNVAcOSff 2026-09-13 8/400 2026-09-16 14:24 by i3KBRD19ERkG
[硕博家园] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 0pYnUiPDfdnk 2026-09-14 3/150 2026-09-16 06:51 by LH5NkK5Ud4bh
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 40ms4Wlo4umh 2026-09-14 3/150 2026-09-16 06:48 by LH5NkK5Ud4bh
[考研] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 23jxep3nCNZb 2026-09-14 3/150 2026-09-16 05:51 by LH5NkK5Ud4bh
[硕博家园] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 6F5UbRU2I5hL 2026-09-14 3/150 2026-09-16 05:27 by LH5NkK5Ud4bh
[找工作] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 6F5UbRU2I5hL 2026-09-14 3/150 2026-09-16 05:15 by LH5NkK5Ud4bh
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +5 6F5UbRU2I5hL 2026-09-14 5/250 2026-09-16 04:51 by LH5NkK5Ud4bh
[硕博家园] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +4 s3fFTmArrBt6 2026-09-13 6/300 2026-09-16 03:50 by DgNGHc3h5tPl
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 QUjhNVAcOSff 2026-09-13 5/250 2026-09-16 02:14 by DgNGHc3h5tPl
[考博] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +6 s3fFTmArrBt6 2026-09-14 7/350 2026-09-15 16:47 by CgyNCDVNhGVg
[硕博家园] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +5 LwdutQ8HoqWP 2026-09-13 5/250 2026-09-15 15:14 by CgyNCDVNhGVg
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 3n8v2C8RimXI 2026-09-13 5/250 2026-09-15 14:58 by CgyNCDVNhGVg
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +4 3n8v2C8RimXI 2026-09-13 4/200 2026-09-15 14:34 by VMDqgnlKimtZ
[考研] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +6 QUjhNVAcOSff 2026-09-13 7/350 2026-09-15 14:22 by VMDqgnlKimtZ
[考博] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 6F5UbRU2I5hL 2026-09-14 3/150 2026-09-15 07:58 by C79jjtjAKjEn
[教师之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 6F5UbRU2I5hL 2026-09-14 4/200 2026-09-15 07:50 by C79jjtjAKjEn
[教师之家] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +4 s3fFTmArrBt6 2026-09-13 4/200 2026-09-15 06:50 by 5BDX0d0WFp7t
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 s3fFTmArrBt6 2026-09-13 5/250 2026-09-15 06:49 by 5BDX0d0WFp7t
[基金申请] 求教各位大神:2026教育部人文社科青年基金项目何时公示呀? +5 云宴山人 2026-09-10 7/350 2026-09-14 12:11 by ecnu2013
[考博] 西北工业大学材料学院电化学传感与催化课题组招收2027年推免研究生、博士生、博士后 +3 马方园 2026-09-10 4/200 2026-09-14 09:29 by Chem张zz
信息提示
请填处理意见