24小时热门版块排行榜    

查看: 706  |  回复: 4
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

zyj8119

木虫 (著名写手)

[交流] 【讨论】此matlab要怎么样才能运行出来? 已有3人参与

CODE:
function crystal(varargin)
a=varargin{1}(:);
switch varargin{2}
    case{'cubic','square','vertical'}%立方,四方和正交
        v=[-a(1)/2 -a(2)/2 -a(3)/2;-a(1)/2 a(2)/2 -a(3)/2;
           -a(1)/2 -a(2)/2  a(3)/2;a(1)/2 -a(2)/2 -a(3)/2;
            a(1)/2  a(2)/2 -a(3)/2;a(1)/2 -a(2)/2  a(3)/2;
           -a(1)/2  a(2)/2  a(3)/2;a(1)/2  a(2)/2  a(3)/2];
       cube(v);mf2(v);axis([-a(1)-0.5 a(1)+0.5 -a(2)-0.5 a(2)+0.5 -a(3)...
           a(3)]);
       switch varargin{2}
           case'cubic'
           text('pos',[a(1) a(2) a(3) -0.1],'string','立方晶系')
           case'square'
           text('pos',[a(1) a(2) a(3) -0.1],'string','四方晶系')
           case'vertical'
           text('pos',[a(1) a(2) a(3) -0.1],'string','正交晶系')
       end
end

回复此楼

» 猜你喜欢

好好学习,天天向上。
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zyj8119

木虫 (著名写手)

引用回帖:
Originally posted by xiegangmai at 2010-12-29 22:40:27:

楼主用的哪个版本的MATLAB啊?
cube是你写的一个函数吗?

画立方体的一个函数。。
好好学习,天天向上。
3楼2010-12-30 00:17:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 5 个回答

xiegangmai

版主 (职业作家)

我没头衔

优秀版主优秀版主优秀版主


小木虫(金币+0.5):给个红包,谢谢回帖交流
引用回帖:
Originally posted by zyj8119 at 2010-12-29 20:37:43:
[code]function crystal(varargin)
a=varargin{1}(;
switch varargin{2}
    case{'cubic','square','vertical'}%立方,四方和正交
        v=[-a(1)/2 -a(2)/2 -a(3)/2;-a(1)/2 a(2)/2 -a(3)/2;
          ...

楼主用的哪个版本的MATLAB啊?
cube是你写的一个函数吗?
明德厚学、求是创新
2楼2010-12-29 22:40:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xiegangmai

版主 (职业作家)

我没头衔

优秀版主优秀版主优秀版主


小木虫(金币+0.5):给个红包,谢谢回帖交流
引用回帖:
Originally posted by zyj8119 at 2010-12-30 00:17:07:

画立方体的一个函数。。

信息不全,不好调试,不能判断哪儿有问题。
明德厚学、求是创新
4楼2010-12-30 14:36:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wb1895

木虫 (正式写手)

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
robert2020(金币+1):谢谢应助!鼓励继续解答! 2010-12-30 23:00:00
你这个不难啊,主要是你的参数varargin,次方程的作用就是根据这个参数然后判定它的晶体结构。要运行很简单。
但是你主要了解的是varargin这个参数的结构,即在其矩阵中哪些参数的意思。
5楼2010-12-30 17:34:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
信息提示
请填处理意见