diff --git a/NAMESPACE b/NAMESPACE
index a62727c..b6439d3 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -1,6 +1,6 @@
 # Generated by roxygen2: do not edit by hand
 
-S3method(summary,adf)
-S3method(summary,all)
-S3method(summary,kpss)
-S3method(summary,pp)
+export(summary_adf)
+export(summary_all)
+export(summary_kpss)
+export(summary_pp)
diff --git a/R/summary-adf.R b/R/summary-adf.R
index 4fcacc8..cdd75ea 100644
--- a/R/summary-adf.R
+++ b/R/summary-adf.R
@@ -7,9 +7,9 @@
 #' @param lag Integer lag length. For example, if the value is \code{10}, results will come for lag lengths of \code{1:10}.
 #' @export
 #' @examples
-#' summary.adf(ts_model,10)
+#' summary_adf(ts_model,10)
 
-summary.adf <- function(model,lag) {
+summary_adf <- function(model,lag) {
   
   if (lag>20) {
     stop("Lag can not be greater than 20.")
diff --git a/R/summary-all.R b/R/summary-all.R
index 996e74b..596b17b 100644
--- a/R/summary-all.R
+++ b/R/summary-all.R
@@ -7,9 +7,9 @@
 #' @param lag Integer lag length. For example, if the value is \code{10}, results will come for lag lengths of \code{1:10}.
 #' @export
 #' @examples
-#' summary.all(ts_model,10)
+#' summary_all(ts_model,10)
 
-summary.all <- function(model,lag) {
+summary_all <- function(model,lag) {
 
   if (lag>20) {
     stop("Lag can not be greater than 20.")
diff --git a/R/summary-kpss.R b/R/summary-kpss.R
index f0e3a3b..2a1526a 100644
--- a/R/summary-kpss.R
+++ b/R/summary-kpss.R
@@ -7,9 +7,9 @@
 #' @param lag Integer lag length. For example, if the value is \code{10}, results will come for lag lengths of \code{1:10}.
 #' @export
 #' @examples
-#' summary.kpss(ts_model,10)
+#' summary_kpss(ts_model,10)
 
-summary.kpss <- function(model,lag) {
+summary_kpss <- function(model,lag) {
   
   if (lag>20) {
     stop("Lag can not be greater than 20.")
diff --git a/R/summary-pp.R b/R/summary-pp.R
index 8cb86ef..b1d94ac 100644
--- a/R/summary-pp.R
+++ b/R/summary-pp.R
@@ -7,9 +7,9 @@
 #' @param lag Integer lag length. For example, if the value is \code{10}, results will come for lag lengths of \code{1:10}.
 #' @export
 #' @examples
-#' summary.pp(ts_model,10)
+#' summary_pp(ts_model,10)
 
-summary.pp <- function(model,lag) {
+summary_pp <- function(model,lag) {
   
   if (lag>20) {
     stop("Lag can not be greater than 20.")
diff --git a/cran-comments.md b/cran-comments.md
new file mode 100644
index 0000000..756573b
--- /dev/null
+++ b/cran-comments.md
@@ -0,0 +1,10 @@
+## Test environments
+* local R installation, R 4.1.0
+* ubuntu 16.04 (on travis-ci), R 4.1.0
+* win-builder (devel)
+
+## R CMD check results
+
+0 errors | 0 warnings | 1 note
+
+* This is a new release.
diff --git a/man/summary.adf.Rd b/man/summary_adf.Rd
similarity index 82%
rename from man/summary.adf.Rd
rename to man/summary_adf.Rd
index 955e6bf..e25758e 100644
--- a/man/summary.adf.Rd
+++ b/man/summary_adf.Rd
@@ -1,10 +1,10 @@
 % Generated by roxygen2: do not edit by hand
 % Please edit documentation in R/summary-adf.R
-\name{summary.adf}
-\alias{summary.adf}
+\name{summary_adf}
+\alias{summary_adf}
 \title{ADF Test Results.}
 \usage{
-\method{summary}{adf}(model, lag)
+summary_adf(model, lag)
 }
 \arguments{
 \item{model}{fitted \code{lm(y ~ x)}  object}
@@ -15,5 +15,5 @@
 This function computes ADF statistics and critical values and aggregate them in one dataframe for all possible situations.
 }
 \examples{
-summary.adf(ts_model,10)
+summary_adf(ts_model,10)
 }
diff --git a/man/summary.all.Rd b/man/summary_all.Rd
similarity index 82%
rename from man/summary.all.Rd
rename to man/summary_all.Rd
index eca34ae..5c5755e 100644
--- a/man/summary.all.Rd
+++ b/man/summary_all.Rd
@@ -1,10 +1,10 @@
 % Generated by roxygen2: do not edit by hand
 % Please edit documentation in R/summary-all.R
-\name{summary.all}
-\alias{summary.all}
+\name{summary_all}
+\alias{summary_all}
 \title{Aggregate KPSS, ADF and PP Test Results}
 \usage{
-\method{summary}{all}(model, lag)
+summary_all(model, lag)
 }
 \arguments{
 \item{model}{fitted \code{lm(y ~ x)}  object}
@@ -15,5 +15,5 @@
 This function computes unit root test results and aggregate them in one dataframe for all possible situations.
 }
 \examples{
-summary.all(ts_model,10)
+summary_all(ts_model,10)
 }
diff --git a/man/summary.kpss.Rd b/man/summary_kpss.Rd
similarity index 82%
rename from man/summary.kpss.Rd
rename to man/summary_kpss.Rd
index 0380c87..51b4d92 100644
--- a/man/summary.kpss.Rd
+++ b/man/summary_kpss.Rd
@@ -1,10 +1,10 @@
 % Generated by roxygen2: do not edit by hand
 % Please edit documentation in R/summary-kpss.R
-\name{summary.kpss}
-\alias{summary.kpss}
+\name{summary_kpss}
+\alias{summary_kpss}
 \title{KPSS Test result.}
 \usage{
-\method{summary}{kpss}(model, lag)
+summary_kpss(model, lag)
 }
 \arguments{
 \item{model}{fitted \code{lm(y ~ x)}  object}
@@ -15,5 +15,5 @@
 This function computes KPSS statistics and critical values and aggregate them in one dataframe for all possible situations.
 }
 \examples{
-summary.kpss(ts_model,10)
+summary_kpss(ts_model,10)
 }
diff --git a/man/summary.pp.Rd b/man/summary_pp.Rd
similarity index 83%
rename from man/summary.pp.Rd
rename to man/summary_pp.Rd
index 0dbe608..09a1f22 100644
--- a/man/summary.pp.Rd
+++ b/man/summary_pp.Rd
@@ -1,10 +1,10 @@
 % Generated by roxygen2: do not edit by hand
 % Please edit documentation in R/summary-pp.R
-\name{summary.pp}
-\alias{summary.pp}
+\name{summary_pp}
+\alias{summary_pp}
 \title{PP Test Results.}
 \usage{
-\method{summary}{pp}(model, lag)
+summary_pp(model, lag)
 }
 \arguments{
 \item{model}{fitted \code{lm(y ~ x)}  object}
@@ -15,5 +15,5 @@
 This function computes PP statistics and critical values and aggregate them in one dataframe for all possible situations.
 }
 \examples{
-summary.pp(ts_model,10)
+summary_pp(ts_model,10)
 }