楼主: JasonKQiao
2081 2

[问答] 求问R:的一个画图的问题 [推广有奖]

  • 0关注
  • 1粉丝

已卖:371份资源

硕士生

33%

还不是VIP/贵宾

-

威望
0
论坛币
303 个
通用积分
0.2100
学术水平
1 点
热心指数
0 点
信用等级
0 点
经验
1471 点
帖子
93
精华
0
在线时间
59 小时
注册时间
2010-10-3
最后登录
2023-5-7

楼主
JasonKQiao 发表于 2011-11-14 19:52:40 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
使用ciplot画上n个置信区间,其中confint是一个2*n的矩阵,第一行是置信区间的下界,第二行是置信区间的上界。
以下是代码,当时总是出现:
错误于int_abline(a = a, b = b, h = h, v = v, untf = untf, ...) :
  找不到对象'true'
并且图像出来是一片空白……求问这个程序哪个地方错了~~~~
谢谢大家了!
ciplot <- function(confint, true)
{
n <- length(confint[1,]) # find number of confidence intervals
x <- matrix(c(1:n,1:n),nrow=n,ncol=2)
y <- c(t(x)) # produces vector with y[2i-1] = y[2i] = i
z <- c(confint) # vector with z[2i-1] lower bound, z[2i] upper bound of ith ci
plot(z, y, type="n", ylab="Sample number") # plot end points of ci
abline(v=true) # draw vertical line at true value of parameter
for (i in 1:n)
{
a <- 2*i-1
b <- 2*i
if (z[a] <= true & z[b] >= true) # interval contains true value of parameter
{
lines(z[a:b],y[a:b],col=2) # join endpoints of ci with red line
}
else
{
lines(z[a:b],y[a:b],col=4) # join endpoints of ci with blue line
}}}
二维码

扫码加我 拉你入群

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

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

关键词:abline 找不到对象 置信区间 plot line 画图

沙发
shenbaiseshatan 在职认证  发表于 2011-11-19 21:59:11
建议看看基础的教程,任何一本都有介绍,主要是字符值、逻辑值、大小写混淆不清的问题
胜人者有力,自胜者强!

藤椅
DM小菜鸟 发表于 2015-3-2 21:38:36
如果你这个function里面的true不是布尔值,那就要界定一下
如果是布尔值,必须要大写,TRUE

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-9 05:23