From 170c6782c4d520c76d23f7222e2d188df7fb52d3 Mon Sep 17 00:00:00 2001 From: JinzhuangDou Date: Wed, 28 Sep 2022 08:58:11 -0500 Subject: [PATCH] Update generics.R --- R/generics.R | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/R/generics.R b/R/generics.R index 0f38188..61795ac 100755 --- a/R/generics.R +++ b/R/generics.R @@ -198,19 +198,19 @@ plotIteration <- function(x = NULL){ "delta" = x$delta ) - p1 <- ggplot(dt, aes(x = iter, y = cost_left, color = "#00AFBB")) + + p1 <- ggplot(dt, aes(x = iter, y = cost_left, color = "#00AFBB")) + geom_point() + xlab("Iteration time") + ylab("obj. on left CCA") + theme_classic() - p2 <- ggplot(dt, aes(x = iter, y = cost_right, color = "#00AFBB")) + + p2 <- ggplot(dt, aes(x = iter, y = cost_right, color = "#00AFBB")) + geom_point() + xlab("Iteration time") + ylab("obj. on right CCA") + theme_classic() - p3 <- ggplot(dt, aes(x = iter, y = cost_z0, color = "#00AFBB")) + + p3 <- ggplot(dt, aes(x = iter, y = cost_z0, color = "#00AFBB")) + geom_point() + xlab("Iteration time") + ylab("obj. on ||Z-Z0||") + theme_classic() - p4 <- ggplot(dt, aes(x = iter, y = cost_right, color = "#00AFBB")) + + p4 <- ggplot(dt, aes(x = iter, y = cost_right, color = "#00AFBB")) + geom_point() + xlab("Iteration time") + ylab("obj. on all three terms") + theme_classic() - p5 <- ggplot(dt, aes(x = iter, y = delta, color = "#00AFBB")) + + p5 <- ggplot(dt, aes(x = iter, y = delta, color = "#00AFBB")) + geom_point() + xlab("Iteration time") + ylab("Relative change of Z") + theme_classic()