y <- filter(lambda*x, filter=1-lambda, method="recursive", init=init) return (y)
*編集モード固定に関わらず、コピー元の編集モードが反映されます。