Taking variance of some rows above in panel structrure (R data table )

Question

# Example of a panel data
panel<-data.table(expand.grid(Year=c(2017:2020),Individual=c("A","B","C")))
panel$value<-rnorm(nrow(pan