R语言初级新手，求指教~~~关于plot函数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

为什么这段代码，写进去它执行不出来结果？也不提示错误？急求？
Ex=3.878318584
En=1.253314137
He=0.842498687
n=491
plot.f=function(x,y){
matrix(0,nrow=1,ncol=n)->x
matrix(0,nrow=1,ncol=n)->y
x=rnorm(n,0,1)*He+Enx  #产生一个1*n型正态随机数矩阵，EX为期望，ENN为方差
for(i in 1:n)
{x(1,i)->Enn   #Enn必须是正的
x(1, i)=rnorm(1,0,1)*Enn+Ex #产生一个正态随机数，EX为期望，ENN为方差(1*1型)
y(1, i)=exp(-(x(1, i)-Ex)^2 / (2* Enn^2) )
plot(x(1,i),y(1,i),type="1")
}
}

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：plot 求指教 R语言 function matrix

因这你这是在编写一个函数，而函数没有input,当然也不会有结果。
最简单的来说，就相当于你把1赋值给plot.f一样
plot.f<-1
什么也不会提示，但是你要显示plot.f的时候，才会出来东西。

jiangbeilu 发表于 2014-12-1 12:51
因这你这是在编写一个函数，而函数没有input,当然也不会有结果。
最简单的来说，就相当于你把1赋值给plot. ...

我新学R，有许多问题，虚心求教~跪求多多帮忙~
我有太多问题了：
1，假设我要对计算一个矩阵的均值方差等，但是我只计算非零数的均值，
for example: A=[1,0,3,4   0,0,2,2   3,3,2,0  4,2,1,0  0,1,0,2]假设A是一个4*5的矩阵，每四个一组，代表一列，我要计算这一列的均值（比如第一列，均值为（1+3+4）/3），方差，还有其他等等 ,我想要这样计算，您能明白我的意思吗？可以做出来吗？

duzongyan 发表于 2014-12-1 14:44
我新学R，有许多问题，虚心求教~跪求多多帮忙~
我有太多问题了：
1，假设我要对计算一个矩阵的均值方差 ...

1. A <- matrix(c(1,0,3,4,0,0,2,2,3,3,2,0,4,2,1,0,0,1,0,2), nrow=4, byrow=F)
   
2. apply(A, 2, function(x) mean(x[x != 0]))

复制代码

jiangbeilu 发表于 2014-12-1 12:51
因这你这是在编写一个函数，而函数没有input,当然也不会有结果。
最简单的来说，就相当于你把1赋值给plot. ...

您好，高手！还想再向您请教一个问题：

这个应该代码应该怎么写？ 我试着写了一段 ，结果出来是Ｏ，不知道哪里循环出错了，我把代码发出来给您看看哈～
A=matrix(c(1,2,3,0,1,4,2,0,4,5,2,0,3,4,0,5,1,3,2,0,3,4,5,1,2,0,3,1,4,0),6,5)
result=matrix(0,5,ncol(A))
{
  for (i in 1:ncol(A))
   {
     for(k in A[,i])
      {
        for(j in 1:5)
         {
          temp=0
          if(k==j)
          {
           temp=temp+1
          }
          p[j]=temp/length(A[,i]!=0)
         }
       }
   }
result
}

先说清楚你要做什么，再问代码应该怎么写。

jiangbeilu 发表于 2014-12-18 12:15
先说清楚你要做什么，再问代码应该怎么写。

好吧，上一个问题已经解决了。不过还是谢谢您啦~