Only implements nearest neighbour interpolation.

nr_blit_rotozoom(nr, src, x, y, angle, scale)

Arguments

nr

destination

src

src

x, y

location to start within dst

angle

angle in radians

scale

zoom factor

Value

None. nr modified in-place and returned invisibly

Examples

nr <- nr_new(200, 200)
sq <- nr_new(20, 20, 'darkblue')
nr_blit_rotozoom(nr, src = sq, x = 100, y = 100, angle = pi/3, scale = 5)
plot(nr)