異なる可変長カラムを持つボックスプロットb/w 2つのデータフレーム

Question

私は2つのデータフレームを持っています。それらの長さは異なります。

df1: 
Samples Number 
A9GS  73 
A9GY  142 
ASNO  327 
A5UE  131 

df2: 
Samples Number 
AUFS  107 
A9JY  42 
AKNO  32 
A9FE  111 
A9GY  12 
ADNO  37 
A2KE  451 

私はこれについてwilcoxonテストを行っています。

wilcox.test(df1$Number,df2$Number, correct=FALSE) 

これは私にp値を与えました。これを視覚化するために、私はボックスプロット関数を使用し、以下のようなエラーを出しました。

boxplot(df1$Number ~ df2$Number, xlim=c(0.5,3)) 
Error in model.frame.default(formula = df1$Number ~ df2$Number) : 
    variable lengths differ (found for 'df2$Number') 

私の間違いを訂正し、プロット上のp値を取得する方法を教えてください。

Answer 1

データフレームと1-1のペアがある場合（通常はRHSが数値ではなくグループ変数である場合）、式は使用できません。数式1ではなくリスト配信システムを使用する必要があります。私は実際の例を構築できるかどうかを見ていきます。

プロットがで達成される：

png(); boxplot(list(df1_N=df1$Number, df2_N = df2$Number)); dev.off() 

そして注釈は、一般的にbquoteで構築?plotmath引数を受け入れtext機能で行うことができます。

text(1.5, 400, 
    label=bquote( 
     p~value == .(wilcox.test(df1$Number,df2$Number, correct=FALSE)$p.value) 
    )) 

あなただけ一緒に2つのデータフレームを入れ、その後、プロット上にp値を貼り付け.( ) -function

Answer 2

内の表現の周りにp値を使用round(...)を丸めるしたい場合：

df1 <- data.frame(samples = c('A9GS', 'A9GY', 'ASNO', 'ASUE'), 
         number = c(73, 142, 327, 131)) 
df2 <- data.frame(samples=c('AUFS', 'A9JY', 'AKNO', 'A9FE', 'A9GY', 'ADNO', 
           'A2KE'), 
         number = c(107, 42, 32, 111, 12, 37, 451)) 

df1$group <- 'df1' 
df2$group <- 'df2' 

df <- rbind(df1, df2) 

m<-wilcox.test(df1$number,df2$number, correct=FALSE) 

library(ggplot2) 
jpeg('path/to/where/you/want/the/file/saved/picture.jpeg') 
ggplot(df, aes(x=group, y=number, group=group)) + 
    geom_boxplot() + 
    annotate('text', label=paste('p =', round(m$p.value, 2)), x=.5, y=400) 
dev.off() 

利回り：wilcox.test.defaultで