На этом компьютере у меня нет R, но здесь есть трещина. Вы можете использовать par
для отображения нескольких графиков в окне или как это, чтобы вызвать клик перед отображением следующей страницы.
plotfun <- function(col)
plot(data[ , col], ylab = names(data[col]), type = "l")
par(ask = TRUE)
sapply(seq(1, length(data), 1), plotfun)
E12
означает «умножается на 10 на 12-ю степень», иначе известную как научная нотация. если вы хотите просто вывести цифры, вы можете сделать что-то вроде этого
$timestamp = round(microtime(true)*1000);
echo number_format($timestamp,0,".","");
. Это будет выводить только номер без научной нотации.
Чтобы получить временные метки в течение нескольких дней, вы можете используйте strtotime()
.
$microSeconds = microtime(true) - (float)time();
$sevenDaysAgo = (float)strtotime('-7 days') + $microSeconds;
$oneMonthAgo = (float)strtotime('-1 Month') + $microSeconds;
$sevenDaysAgo *= 1000;
$oneMonthAgo *= 1000;
echo number_format($sevenDaysAgo,0,".","");
echo number_format($oneMonthAgo,0,".","");