散點圖子集顏色形狀ifelse

Question

我想做一個散點圖，其中子集中的某些值在顏色和形狀上的繪制方式不同。 我已經解決了以下代碼，但是我沒有做到正確。 任何幫助，不勝感激！

# My data
iris
iris$Code <- 1:150

# A selection of my data I'd like to plot differently
subset <- subset(iris, iris$Sepal.Width<3.5)
sel <- as.character(subset$Code) # I think the problems start here :)

# Plotting doesn't work
plot(iris$Sepal.Length ~ iris$Sepal.Width,
     col=ifelse(iris$Code==sel, "red", "black"),
     pch=ifelse(iris$Code==sel, 17, 1))

Answer 1

嘗試這個：

#define subset
sel <- iris[iris$Sepal.Width<3.5,"Code"]
#plot
plot(iris$Sepal.Length ~ iris$Sepal.Width,
     col=ifelse(iris$Code %in% sel, "red", "black"),
     pch=ifelse(iris$Code %in% sel, 17, 1))

注意：在您的代碼中有一些明顯的錯誤：

dd <- iris為什么分配給dd而不使用它？

iris$Sepal.Widith拼寫

... "black") -末尾缺少逗號。