隐藏此图中的图例
Hiding the Legend in this Graph
我制作此图是为了展示优化算法 (https://rstudio-pubs-static.s3.amazonaws.com/132872_620c10f340f348b88453d75ec99960ff.html) 取得的进展:
library(GA)
data("eurodist", package = "datasets")
D <- as.matrix(eurodist)
tourLength <- function(tour, distMatrix) {
tour <- c(tour, tour[1])
route <- embed(tour, 2)[,2:1]
sum(distMatrix[route])
}
#Firness function to be maximized
tspFitness <- function(tour, ...) 1/tourLength(tour, ...)
GA <- ga(type = "permutation", fitness = tspFitness, distMatrix = D,
min = 1, max = attr(eurodist, "Size"), popSize = 50, maxiter = 5000,
run = 500, pmutation = 0.2)
plot(GA)
- “图例”似乎模糊了图表 - 是否可以通过某种方式隐藏图例?
通常情况下,使用 Base R 和 GGPLOT2 库制作的图表可以很容易地禁用其图例 - 但由于此处使用的绘图功能来自不同的库,我不确定是否可以禁用此功能图例.
谢谢!
这应该有效:
plot(GA, legend = FALSE)
P.S,如果您不熟悉包函数,我发现使用 ??GA::plot
在控制台中查找 R-documentation 总是有帮助的
我制作此图是为了展示优化算法 (https://rstudio-pubs-static.s3.amazonaws.com/132872_620c10f340f348b88453d75ec99960ff.html) 取得的进展:
library(GA)
data("eurodist", package = "datasets")
D <- as.matrix(eurodist)
tourLength <- function(tour, distMatrix) {
tour <- c(tour, tour[1])
route <- embed(tour, 2)[,2:1]
sum(distMatrix[route])
}
#Firness function to be maximized
tspFitness <- function(tour, ...) 1/tourLength(tour, ...)
GA <- ga(type = "permutation", fitness = tspFitness, distMatrix = D,
min = 1, max = attr(eurodist, "Size"), popSize = 50, maxiter = 5000,
run = 500, pmutation = 0.2)
plot(GA)
- “图例”似乎模糊了图表 - 是否可以通过某种方式隐藏图例?
通常情况下,使用 Base R 和 GGPLOT2 库制作的图表可以很容易地禁用其图例 - 但由于此处使用的绘图功能来自不同的库,我不确定是否可以禁用此功能图例.
谢谢!
这应该有效:
plot(GA, legend = FALSE)
P.S,如果您不熟悉包函数,我发现使用 ??GA::plot