R/Analyze4C_alt.R

In akivab2/Analyze4CPackage: Analysis Of 4C Data

#' @export

#this is the starting function of the package
Analyze4C_alt <- function()
{
	cat("      *****************************\n                Analyze 4C       \n      *****************************\n\n\n")

	#here needs to be a welcome and description
	
	main.menu_alt()
	
	setwd("..") #returning to root folder
	
	#exiting message
	cat("thank you\ncome again...\n\n")
}