R/calculation.R
Lmove.Rd
Move the tree rings coordinates based on P00 (x,y movement coordinates).
Lmove(L, P00 = P00)
moved L to center point 0,0
Lplot(TR@L)
sapply(Lmove(TR@L,c(3000,-3000)),lines,col="blue")
#> $`0`
#> NULL
#>
#> $`1`
#> NULL
#>
#> $`10`
#> NULL
#>
#> $`23`
#> NULL
#>
#> $`28`
#> NULL
#>
#> $`33`
#> NULL
#>
#> $`38`
#> NULL
#>
#> $`43`
#> NULL
#>
#> $`48`
#> NULL
#>
#> $`53`
#> NULL
#>
#> $`58`
#> NULL
#>
#> $`63`
#> NULL
#>
#> $`68`
#> NULL
#>
#> $`73`
#> NULL
#>
#> $`78`
#> NULL
#>
#> $`83`
#> NULL
#>
#> $`88`
#> NULL
#>
#> $`93`
#> NULL
#>
#> $`98`
#> NULL
#>
#> $`103`
#> NULL
#>
#> $`108`
#> NULL
#>
#> $`113`
#> NULL
#>
#> $`118`
#> NULL
#>
#> $`123`
#> NULL
#>
#> $`128`
#> NULL
#>
#> $`133`
#> NULL
#>
#> $`138`
#> NULL
#>
#> $`143`
#> NULL
#>
#> $`148`
#> NULL
#>
#> $`153`
#> NULL
#>
#> $`158`
#> NULL
#>
#> $`163`
#> NULL
#>
#> $`168`
#> NULL
#>
#> $`173`
#> NULL
#>
#> $`178`
#> NULL
#>
#> $`183`
#> NULL
#>
#> $`184`
#> NULL
#>
#> $`185`
#> NULL
#>