File: foo.R

package info (click to toggle)
r-cran-circlize 0.4.5-1
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 3,312 kB
  • sloc: makefile: 8
file content (15 lines) | stat: -rwxr-xr-x 331 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
i = 1
while(1) {
	cat("\r")
	str = paste(paste(rep(" ", i), collapse = ""), "http://jokergoo.github.io/circlize", collapse = "")
	i = i+1
	if(nchar(str) > 80) {
		cat(paste(rep(" ", 80), collapse = ""))
		str = "http://jokergoo.github.io/circlize"
		i = 0
		cat("\r")
	}
	cat(str)
	Sys.sleep(0.2)
	flush.console()
}