Rでσの95%CI（ワルド法）を確認したい

Question

Rでσの95%CI（ワルド法）を確認したいのですが、以下資料の式が分かりません。
どなたか解説して頂いてもよろしいでしょうか。（σ2の95%CIも同様に）
資料は添付した写真です。
（平均値の95%CIは理解しています。）

xvec<-c(2,5,3,7,-3,-2,0)
sqrt(sum((xvec-2)^2)/length(xvec))#sigma
#[1] 3.380617

3.380617-1.96*3.380617/sqrt(2*length(xvec))
#[1] 1.609742
3.380617+1.96*3.380617/sqrt(2*length(xvec))
#[1] 5.151492
```![イメージ説明](b271a2b95104a77a143078a41ba6ccb3.jpeg)