search for: lincc

...te functions using R. Below is code which calculates Lin's Concordance Coefficient. After I calculate the coefficient I want to create a scatter plot which annotates the coefficient along with preceding text onto the plot. The below code doesn't seem to work. If I use only the object 'lincc' on the text command it works (but doesn't give me the preceding text) or if I use only "Lin's Concordance Coefficient = " on the text command it works (but doesn't place on the plot the value for the object 'lincc'). Similarly, I have tried using: linc=...

...*********************************** lin <- function (x,y, digits=3) # How did the person who knew about # the digits argument know about # this argument other than through # experience { lincc <- (2 * cov(x,y,use="pairwise.complete.obs")) / (var(x,use="pairwise.complete.obs") + (var(y,use="pairwise.complete.obs"))+ ((mean(x,na.rm=TRUE) - mean(y,na.rm=TRUE))^2)) print(lincc) etc... }