Could you please solve below in R code

PartOperatorRepetitionValue 111488.418 211484.798 311489.445 411485.758 511489.043 611484.415 711483.426 811483.939 911491.625 1011486.168 112487.071 212485.125 312489.529 412486.635 512488.774 612484.624 712482.565 812484.589 912491.752 1012486.466 121489.424 221486.353 321490.768 421485.437 521489.762 621485.3 721483.869 821485.025 921492.408 1021488.344 122488.896 222485.25 322490.75 422486.666 522489.66 622485.065 722482.968 822484.079 922491.326 1022487.663

A gauge repeatability and reproducibility study for a new height gauge was performed at the vendor location prior to shipment. Data was generated for 2 appraisers, each measuring 10 parts, 2 times. The results are located in the file height.dat. Perform a potential capability analysis, then answer the following questions. The part specification tolerance range is 480 to 495. What are the degrees of freedom for the factor part?

What are the degrees of freedom for the factor appraiser?

What are the degrees of freedom for the factor part:appraiser?

Which of the following factors are statistically significant in the ANOVA?

What is the value for percent contribution for the Total Gage R&R?

What is the value for percent tolerance for the Total Gage R&R?