This shows you the differences between two versions of the page.
notes:net:rdat [2017/09/17 11:15] vlado |
notes:net:rdat [2017/09/17 11:19] (current) vlado |
||
---|---|---|---|
Line 87: | Line 87: | ||
a;b;30-10-2016 | a;b;30-10-2016 | ||
</code> | </code> | ||
- | using a short program in R | + | using a short program in R (set your starting date in ''d0'' and your directory in ''setwd()'' ) |
<code> | <code> | ||
> d0 <- as.numeric(as.Date(ISOdate(2016,10,1)))-1 | > d0 <- as.numeric(as.Date(ISOdate(2016,10,1)))-1 | ||
> nDays <- function(d) return(as.numeric(d)-d0) | > nDays <- function(d) return(as.numeric(d)-d0) | ||
- | > setwd("C:/Users/batagelj/Documents/papers/2017/Moscow/Rnet/pajek") | + | > setwd("C:/Users/batagelj/***/Rnet/pajek") |
> links <- read.csv2("dates.csv",encoding='UTF-8',colClasses="character") | > links <- read.csv2("dates.csv",encoding='UTF-8',colClasses="character") | ||
> L <- levels(factor(c(links$from,links$to))); n <- length(L) | > L <- levels(factor(c(links$from,links$to))); n <- length(L) |