File: dlines.R

package info (click to toggle)
r-cran-calibrate 1.7.7-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, bullseye, sid, trixie
  • size: 628 kB
  • sloc: makefile: 2
file content (14 lines) | stat: -rw-r--r-- 308 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
"dlines" <-
function(SetA,SetB,lin="dotted") {
# 
# Function DLINES connects the rows of SetA to the rows of SetB with lines
# 
# Jan Graffelman
# Universitat Politecnica de Catalunya
# January 2004
#
np<-nrow(SetA)
for(i in 1:np) lines(rbind(SetA[i,1:2],SetB[i,1:2]),lty=lin) 
return(NULL)
}