Seperation of Cystein into Ox and Red groups

1. Seperating the Cystein chemical shifts in two group: ox and red

## [1] "C.B.B"
## [1] "C.C.B"
## [1] "C.H.B"

## $C.B.B
##          V1       V1
## V1 2.127621  1.04538
## V1 1.045380 14.66363
## 
## $C.B.C
##            V1         V1
## V1  1.5507773 -0.5105801
## V1 -0.5105801  2.4224110
## 
## $C.C.B
##          V1       V1
## V1 3.999369 1.087832
## V1 1.087832 7.944268
## 
## $C.C.C
##            V1         V1
## V1  2.6355572 -0.3677537
## V1 -0.3677537  3.3194911
## 
## $C.H.B
##          V1       V1
## V1 3.856161 1.987452
## V1 1.987452 6.845071
## 
## $C.H.C
##            V1         V1
## V1  3.5695627 -0.4000584
## V1 -0.4000584  1.2787226

##           V1
## V1 -7.361295

## Warning in mean.default(cacb[1]): argument is not numeric or logical:
## returning NA

## [1] NA
##           V1
## V1 -8.297245

## Warning in mean.default(cacb[1]): argument is not numeric or logical:
## returning NA

## [1] NA
##           V1
## V1 -10.80421

## Warning in mean.default(cacb[1]): argument is not numeric or logical:
## returning NA

## [1] NA

• THere will be generate 6 new data files, need to change this to lest!!!
• C.B.CA.B
• C.B.CA.C
• C.B.CB.B
• C.B.CB.C
• C.C.CA.B
• C.C.CA.C
• C.C.CB.B
• C.C.CB.C
• C.H.CA.B
• C.H.CA.C
• C.H.CB.B
• C.H.CB.C

2. Calculate the statistics

3. Scatter Plot for all the resonance

4. Find the Avg Cov.

## [1] "The Average Coveraince are"

## [1] "B"

##           V1        V1
## V1  5.501921 -0.692594
## V1 -0.692594 12.921619

## [1] "C"

##           V1        V1
## V1  8.394972 -3.201268
## V1 -3.201268  3.710584