From 65798a99d2dd3bbf6be7f6f716d6f29abd1adaa1 Mon Sep 17 00:00:00 2001
From: Zilong-Li <zimusen94@gmail.com>
Date: Sun, 15 Oct 2023 11:40:48 +0200
Subject: [PATCH] add logo

---
 .gitignore                   |  2 +-
 README.Rmd                   |  5 +++--
 README.md                    |  5 +++--
 tests/testthat/test-random.R | 27 +++++++++++++++++++++++++++
 4 files changed, 34 insertions(+), 5 deletions(-)
 create mode 100644 tests/testthat/test-random.R

diff --git a/.gitignore b/.gitignore
index c43204e..b275cfc 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1,6 +1,6 @@
 .Rproj.user
 .Rhistory
-.Rdata
+*.Rdata
 .httr-oauth
 .DS_Store
 src/htslib-1.18
diff --git a/README.Rmd b/README.Rmd
index 664e8b1..9730e25 100644
--- a/README.Rmd
+++ b/README.Rmd
@@ -13,10 +13,11 @@ knitr::opts_chunk$set(
 )
 ```
 
-# vcfppR
+# vcfppR: rapid manipulation of the VCF/BCF files
 
 <!-- badges: start -->
-[R-CMD-check](https://github.com/Zilong-Li/vcfppR/actions/workflows/check-release.yaml/badge.svg)
+![R-CMD-check](https://github.com/Zilong-Li/vcfppR/actions/workflows/check-release.yaml/badge.svg)
+<a href="https://github.com/Zilong-Li/vcfppR"><img src="https://raw.githubusercontent.com/Zilong-Li/random/main/vcfppR.png" height="200" align="right" /></a> 
 <!-- badges: end -->
 
 The vcfppR package implements various useful functions for manipulating the VCF/BCF files in R using the C++ API of vcfpp.
diff --git a/README.md b/README.md
index 56a26af..fd42f1d 100644
--- a/README.md
+++ b/README.md
@@ -1,11 +1,12 @@
 
 <!-- README.md is generated from README.Rmd. Please edit that file -->
 
-# vcfppR
+# vcfppR: rapid manipulation of the VCF/BCF files
 
 <!-- badges: start -->
 
-[R-CMD-check](https://github.com/Zilong-Li/vcfppR/actions/workflows/check-release.yaml/badge.svg)
+![R-CMD-check](https://github.com/Zilong-Li/vcfppR/actions/workflows/check-release.yaml/badge.svg)
+<a href="https://github.com/Zilong-Li/vcfppR"><img src="https://raw.githubusercontent.com/Zilong-Li/random/main/vcfppR.png" height="200" align="right" /></a>
 <!-- badges: end -->
 
 The vcfppR package implements various useful functions for manipulating
diff --git a/tests/testthat/test-random.R b/tests/testthat/test-random.R
new file mode 100644
index 0000000..d9978ec
--- /dev/null
+++ b/tests/testthat/test-random.R
@@ -0,0 +1,27 @@
+q()
+
+load("vcfppR.RData")
+library(hexSticker)
+library(ggplot2)
+
+library(showtext)
+## Loading Google fonts (http://www.google.com/fonts)
+font_add_google("Gochi Hand", "gochi")
+## Automatically use showtext to render text for future devices
+showtext_auto()
+
+names(o)
+
+d <- data.frame(x = unlist(o), 
+                counts = rep(names(o),times = sapply(o,length)))
+
+p <- ggplot(d, aes(x = counts, y = x)) + xlab("") + ylab("") +
+  geom_boxplot()
+p <- p + theme_classic()
+p <- p + theme_transparent()
+
+sticker(p, package="vcfppR", 
+        p_size=20, s_x=0.9, s_y=.7, s_width=1.3, s_height=1.1,
+        filename="vcfppR.png", h_fill = "red", h_color = "orange")
+
+dev.off()