আমি একটি স্ক্রিপ্ট লিখে ডেটা পরীক্ষা wilcox.test
করেছিলাম, তবে যখন আমি ফলাফল পেয়েছি, সমস্ত পি-মান যেখানে 1 এর সমান some আমি এটি করেছি এবং এখন আমার একটি গ্রহণযোগ্য ফলাফল রয়েছে। এটি করা কি ভুল?
test<- function(column,datacol){
library(ggplot2)
t=read.table("data.txt", stringsAsFactors=FALSE)
uni=unique(c(t$V9))
for (xp in uni) {
for(yp in uni) {
testx <- subset(t, V9==xp)
testy <- subset(t, V9==yp)
zz <- wilcox.test(testx[[datacol]],jitter(testy[[datacol]]))
p.value <- zz$p.value
}
}
}
এটি আউটপুট
dput(head(t))
structure(list(V1 = c(0.268912,
0.314681, 0.347078, 0.286945,
0.39562, 0.282182), V2 = c(0.158921, 0.210526, 0.262024, 0.322006,
0.133417, 0.283025), V3 = c(0.214082, 0.166895, 0.132547, 0.147361,
0.09174, 0.169093), V4 = c(0.358085, 0.307898, 0.258352, 0.243688,
0.379224, 0.2657), V5= c(-0.142223, 0.010895, 0.14655,
0.08152, 0.02116, 0.030083), V6 = c(0.096408, -0.091896,
-0.331229, -0.446603, -0.088493, -0.262037), V7` = c(1.680946,
1.649559, 1.534401, 1.130529, 3.441356, 1.211815), V8 = c("NC_000834", "NC_000844",
"NC_000845", "NC_000846", "NC_000857",
"NC_000860" ), V9 = c("Chordata",
"Arthropoda", "Chordata", "Chordata",
"Arthropoda", "Chordata"), V10 =
c("???:???", "Diplostraca",
"???:???", "Rheiformes", "Diptera",
"Salmoniformes"), V11 = c("???:???",
"Branchiopoda", "Mammalia", "Aves",
"Insecta", "Actinopterygii" )), .Names
= c("V1", "V2", "V3", "V4", "V5", "V6", "V7",
"V8", "V9", "V10",
"V11"), row.names = c(NA, 6L),
class = "data.frame")
ডেটাটি খুব বড়, এবং এটিই আমি শুরু করা থ্রেড এবং তারা আমাকে বলেছিল এটি করা ভুল হতে পারে
দ্রষ্টব্য এই প্রশ্নটি টেক্সট.এসই থেকে আসে: ল্যাটেক্স টেবিলের ভিতরে পিডিএফ কনটেন আর আউটপুট উত্পন্ন করছে
dput()
ফাংশন সরবরাহ করে যা এটি করার কোনও প্রয়োজনকে সরিয়ে দেয়। সহায়তা পেতে দয়া করে একটি পুনরুত্পাদনযোগ্য উদাহরণ সরবরাহ করুন।