## Not run:
# R.DHP <- read.triangular(diag=FALSE, names=c("ROccAsp", "REdAsp", "FOccAsp",
# "FEdAsp", "RParAsp", "RIQ", "RSES", "FSES", "FIQ", "FParAsp"),
# nlines = 9)
# .6247
# .3269 .3669
# .4216 .3275 .6404
# .2137 .2742 .1124 .0839
# .4105 .4043 .2903 .2598 .1839
# .3240 .4047 .3054 .2786 .0489 .2220
# .2930 .2407 .4105 .3607 .0186 .1861 .2707
# .2995 .2863 .5191 .5007 .0782 .3355 .2302 .2950
# .0760 .0702 .2784 .1988 .1147 .1021 .0931 -.0438 .2087
#
# R.DHP
# ## End(Not run)
Run the code above in your browser using DataLab