[R] VennDiagram中的錯誤：使用十進制數字時

Question

• 我現在用的是draw.quad.venn()包裝的功能VennDiagram 。
• 我的相交處的值將百分比顯示為十進制數。
• 我傳遞給函數的值四舍五入為3位數字（例如3.033）。

不幸的是，十進制數字之一顯示為0.0970000000000 ... 04，其余值僅保留3個小數位（按預期方式）。

我不知道為什么這個特定值顯示這么多小數位。

有誰知道如何解決這個問題？

Answer 1

csv文件的第1列中包含標簽（未排序）（A，A_B，A_B_C等），而在第3列中包含十進制數字。 這是代碼：

 library(VennDiagram) infile = "xxxx.csv" table <- read.table(file=infile,header=TRUE,sep=";") C <- table[1,3] C_D <- table[2,3] D <- table[3,3] B <- table[4,3] B_C <- table[5,3] B_C_D <- table[6,3] B_D <-table[7,3] A <- table[8,3] A_C <- table[9,3] A_C_D <- table[10,3] A_D <- table[11,3] A_B <- table[12,3] A_B_C <- table[13,3] A_B_C_D <- table[14,3] A_B_D <- table[15,3] total_A = A+A_C+A_C_D+A_D+A_B+A_B_C+A_B_C_D+A_B_D total_B = B+B_C+B_C_D+B_D+A_B+A_B_C+A_B_C_D+A_B_D total_C = C+C_D+B_C+B_C_D+A_C+A_C_D+A_B_C+A_B_C_D total_D = C_D+D+B_C_D+B_D+A_C_D+A_D+A_B_C_D+A_B_D draw.quad.venn(area1=total_A, area2=total_B, area3=total_C, area4=total_D, n12=A_B+A_B_C+A_B_D+A_B_C_D, n13=A_C+A_B_C+A_C_D+A_B_C_D, n14=A_D+A_B_D+A_C_D+A_B_C_D, n23=B_C+A_B_C+B_C_D+A_B_C_D, n24=B_D+A_B_D+B_C_D+A_B_C_D, n34=C_D+A_C_D+B_C_D+A_B_C_D, n123=A_B_C+A_B_C_D, n124=A_B_D+A_B_C_D, n134=A_C_D+A_B_C_D, n234=B_C_D+A_B_C_D, n1234=A_B_C_D, category=c("A","B","C","D"), fill = c("yellow","blue","red","green"), cex=1.5, cat.cex=2)