getTradingFolder: #' get monday of week #' @importFrom lubridate is.Date...
In lukas1421/chinaTrading:
Description
#' get monday of week
#' @importFrom lubridate is.Date
getMondayOfWeek <- function(dat)
weekdayl <- list("星期一"=1,"星期二"=2,"星期三"=3,"星期四"=4,"星期五"=5,"星期六"=6,"星期日"=7 )
if(is.Date(dat))
return(dat-weekdayl[[weekdays(dat)]]+1)
return(dat)
get working directory
Usage
1
lukas1421/chinaTrading documentation built on June 1, 2019, 12:48 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Description
#' get monday of week #' @importFrom lubridate is.Date getMondayOfWeek <- function(dat) weekdayl <- list("星期一"=1,"星期二"=2,"星期三"=3,"星期四"=4,"星期五"=5,"星期六"=6,"星期日"=7 ) if(is.Date(dat)) return(dat-weekdayl[[weekdays(dat)]]+1) return(dat) get working directory
Usage
1 |
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.