楼主: 玥子
3357 6

新手:请教一个R数据导出的问题 [推广有奖]

  • 0关注
  • 0粉丝

高中生

55%

还不是VIP/贵宾

-

威望
0
论坛币
0 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
107 点
帖子
12
精华
0
在线时间
46 小时
注册时间
2010-3-4
最后登录
2019-9-17

楼主
玥子 发表于 2010-3-11 17:20:58 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

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

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
大家好:
     毕业论文需要用到R模拟项目反应理论的反应数据。这个是我编写的程序,运行之后可以在数据编辑器里查看到生成的数据矩阵,但是导出为txt文件之后,行和列的数字就不对了。请问怎样可以导出像数据编辑器里面一样的数据表啊(行和列正确的)?谢谢谢谢~~~~
附上程序部分:
I <- 1000
J <- 60
response <- matrix(0, I, J)
a <- rnorm(J, 0.8, 0.04)
b <- rnorm(J, 0, 1)
gamma<-rnorm(15,0,0.5)
theta <- rnorm(I, 0,1)
sdata <- matrix(0, I, J)
{
simulate <- function(I, J)
sdata <- matrix(0, I, J)
for( i in 1:I ) {
for( j in 1:30 ) {
  temp <- a[j]*(theta[i]-b[j])
  pij <- exp(temp)/(1+exp(temp))
  ptemp <- runif(1)
  if( pij >= ptemp) response[i,j] <- 1
                            sdata [i,j] <- response[i,j]
}
中间可以省略了
sdata<-data.frame
cat(sdata,file="redata.txt")
二维码

扫码加我 拉你入群

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

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

关键词:项目反应理论 毕业论文 编辑器 大家好 数据表 数据 请教 新手

沙发
lovebluesky 发表于 2010-3-11 17:59:12
导入csv不行吗

藤椅
玥子 发表于 2010-3-11 19:15:46
2# lovebluesky
csv是什么啊?不好意思 我才开始学R哈 是学心理测量的 所以不是很清楚 能不能解释一下呢?

板凳
lovebluesky 发表于 2010-3-12 11:45:03
玥子 发表于 2010-3-11 19:15
2# lovebluesky
csv是什么啊?不好意思 我才开始学R哈 是学心理测量的 所以不是很清楚 能不能解释一下呢?
你新建excel表格,然后另存为,在文件名下面那一个选项里,下拉,你就会找到csv格式,逗号分隔符,这种格式其实和excel差不多,应该可以使用。
我也是初学者,不要客气,说的不对也请你见谅

报纸
飘洒 发表于 2010-3-14 12:39:19
你可以试试sink(myfile),myfile 可以用txt来建,在sink(myfile)后面加上你要输出的结果。
It is not entirely satisfying but the alternatives are worse!
统计人

地板
玥子 发表于 2010-3-15 10:50:52
嘿嘿 谢谢大家
我查了一下书哈 好像要先转置矩阵 再导出。。。然后用write.table就行了

7
mandaisy 发表于 2010-4-13 16:45:14
谢谢上面各位,学习了

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

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