Node Red Average Function In R