作者KnightX (........)
站内Statistics
标题Re: [问题] R画双变数的图
时间Wed Apr 2 17:51:08 2008
※ 引述《bcs (= ="frailty..gggg XD)》之铭言:
: xt=c(6.1,-1.1,3.2,0.7,1.7);
: g<-function(x,k) {-5*log(2)-sum(abs(x-k))}
: 请问若我想画出k=1.7 时会g达到最大值该怎麽画?像下面的图
: 想法 curve(g(xt,x),xlim=range(xt))
你的 g 函数没办法使用向量的引数,
所以需要藉助 sapply 这个函数:
curve(sapply(x, function(x) g(xt, x)), xlim=range(xt))
就可以画出你下面的图了~!
: z<-outer(xt,xt,g)
: persp(xt,xt,z)
: 但都行不通。
: 谢谢^^"
: θ
: |\
: | \ /
: | \ /
: | \/
: |---------------- k
: 1.7
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 210.64.251.187