rm ggplot functions

NAMESPACE

@@ -26,6 +26,7 @@ export(apply_row)
 export(array_2dTo3d)
 export(array_3dTo2d)
 export(as.data.table)
+export(bold)
 export(box_qtl)
 export(cdo_grid)
 export(char2expr)
@@ -58,7 +59,6 @@ export(edit_r_environ)
 export(edit_r_profile)
 export(edit_r_profile_sys)
 export(evince)
-export(facet_tag)
 export(file_ext)
 export(file_name)
 export(file_size)
@@ -72,13 +72,13 @@ export(gc_cluster)
 export(gc_linux)
 export(geom_boxplot2)
 export(getwd_clip)
-export(ggplot_legend)
 export(git_commit)
 export(git_commit_amend)
 export(git_push)
 export(git_set_remote)
 export(github)
 export(glue)
+export(green)
 export(group_apply)
 export(guess_names)
 export(icount)
@@ -128,6 +128,7 @@ export(progressively)
 export(quantile_envelope)
 export(read_xlsx)
 export(read_xlsx2list)
+export(red)
 export(reorder_name)
 export(revalue)
 export(rm_empty)
@@ -152,6 +153,7 @@ export(top_frac)
 export(top_n)
 export(touch)
 export(transpose)
+export(underline)
 export(unique_length)
 export(upper_envelope)
 export(use_build_ignore)
@@ -193,10 +195,7 @@ importFrom(dplyr,top_n)
 importFrom(foreach,"%do%")
 importFrom(foreach,"%dopar%")
 importFrom(foreach,foreach)
-importFrom(ggplot2,aes_string)
-importFrom(ggplot2,geom_text)
-importFrom(ggplot2,ggplot_build)
-importFrom(ggplot2,ggplot_gtable)
+importFrom(ggplot2,Stat)
 importFrom(grDevices,cairo_pdf)
 importFrom(grDevices,col2rgb)
 importFrom(grDevices,colorRampPalette)

R/color_terminal.R

@@ -1,3 +1,15 @@
+#' @export
+crayon::bold
+
+#' @export
+crayon::red
+
+#' @export
+crayon::green
+
+#' @export
+crayon::underline
+
 #' Colored terminal output
 #'
 #' @param ... Strings to style.

R/geom_boxplot2.R

@@ -1,3 +1,18 @@
+#' @name ggplot2-ggproto
+#' @title ggplot2-ggproto
+#' 
+#' @format NULL
+#' @usage NULL
+#' @keywords internal
+#' @importFrom ggplot2 Stat
+NULL
+
+check_required_aesthetics <- ggplot2:::check_required_aesthetics
+ggproto_formals <- ggplot2:::ggproto_formals
+snake_class <- ggplot2:::snake_class
+uniquecols <- ggplot2:::uniquecols
+has_groups <- ggplot2:::has_groups
+
 #' A box and whiskers plot (in the style of Tukey)
 #'
 #' The boxplot compactly displays the distribution of a continuous variable.

README.md

@@ -43,15 +43,15 @@ After install, run `Ipaper::key_blind()` to make those shortcuts work.
 
 ### Visualization
 
--   `draw.colorkey`: modified from lattice, add triangle head and tail
+<!-- -   `draw.colorkey`: modified from lattice, add triangle head and tail
 
     ![](man/figures/lgd_draw.colorkey.svg)
 
 -   `geom_boxplot2`: boxplot without outlier
 
-    ![](man/figures/geom_boxplot2.svg)
+    ![](man/figures/geom_boxplot2.svg) -->
 
--   `ggplot_legend`: get the legend (grid obj) of ggplot object
+<!-- -   `ggplot_legend`: get the legend (grid obj) of ggplot object -->
 
 -   `write_fig`: Unify figure writing functions, e.g. png, pdf, tif, svg