File: fillGrid.R

package info (click to toggle)
r-cran-fields 16.3.1-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 4,972 kB
  • sloc: fortran: 1,021; ansic: 288; sh: 35; makefile: 2
file content (13 lines) | stat: -rw-r--r-- 353 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
fillGrid<- function( gridList, M){
  deltaX<-gridList$x[2]- gridList$x[1]
  m1<- length( gridList$x)
  xSeq<- seq( min(gridList$x),max(gridList$x),
              deltaX/M)
  deltaY<-gridList$y[2]- gridList$y[1]
  m2<- length( gridList$y)
  ySeq<- seq( min(gridList$y), max(gridList$y),
              deltaY/M)
  return( 
    list( x= xSeq, y=ySeq)
  )
}