Я думаю, у меня есть ответ. Способ, которым я пытался достичь этого, это:
1) Скажем, мой css3 - это последний CSS в списке, и у меня есть все мои изменения в css4. Я сделал копию css3 и назвал ее «css3-Original.css» и добавил мой css4 в ту же папку. Затем я создал еще один css-файл под названием «css3.css» (потому что это последний из них, который требуется для этого списка) и добавлен сначала импорт исходного Css3, а затем мой переопределяющий файл css4.css, как указано ниже:
css3.css (новый)
@import url("css3-Original.css")
@import url("css4.css")
Это лучший способ найти работу. Таким образом, хотя я знаю, что мой css3.css-файл будет изменяться при обновлениях, но я знаю, как я могу заменить его очень легко и быстро. Я использовал! Важно в моем css4.css везде, где это необходимо (если требуется), но в основном из-за его последнего файла css, он использует этот стиль по сравнению с любыми предыдущими (если они не важны).
Спасибо за предложения, ребята. Наконец, мне удалось найти решение.
Более простая реализация функции mavback w_i_l_l, основанная на его функции mav
mavback <- function(x,n){ filter(x, c(0, rep(1/n,n)), sides=1) }
Вы можете использовать rollmean
, но установите align='right'
. Или вы можете использовать rollmeanr
, который имеет align='right'
в качестве значения по умолчанию.
ma3 <- rollmeanr(x[,1],3,fill=NA)
... но вам все равно придется отставать от результата. Другим решением является использование rollapply
со списком для аргумента width
:
ma3 <- rollapplyr(x[,1],list(-(3:1)),mean,fill=NA)