使用as.data.frame绘制splom（）图形

Question

我需要使用lattice包与as.data.frame函数构建splom()图形，但它不起作用。

library(lattice) 
data(Investment, package = "sandwich") 
Investment <- as.data.frame(Investment, GNP) 
splom(Investment|"Graphic", xlab = "Investment", ylab = "GNP") 

Answer 1

你可以试试这个：

library(lattice) 
data(Investment, package = "sandwich") 
Investment <- as.data.frame(Investment) 

splom(
    x = Investment[c("Investment", "GNP")], 
    main = "Graphic" 
)