Legend x position to 1.05

pedrodz · pedrodz · commit 833d3a6f8f5f · 2014-11-12T15:40:35.000-05:00
diff --git a/R/ggplotly.R b/R/ggplotly.R
@@ -496,7 +496,7 @@ gg2list <- function(p){
     layout$margin$r <- 60
   }
   layout$legend <- list(bordercolor="transparent", 
-                        x=1.04, y=1/2,
+                        x=1.05, y=1/2,
                         xanchor="center", yanchor="top")
   
   # Workaround for removing unnecessary legends.

Original file line number	Diff line number	Diff line change
`@@ -496,7 +496,7 @@ gg2list <- function(p){`
`496`	`496`	`layout$margin$r <- 60`
`497`	`497`	`}`
`498`	`498`	`layout$legend <- list(bordercolor="transparent",`
`499`		`- x=1.04, y=1/2,`
	`499`	`+ x=1.05, y=1/2,`
`500`	`500`	`xanchor="center", yanchor="top")`
`501`	`501`
`502`	`502`	`# Workaround for removing unnecessary legends.`