# NOT RUN {
stimuli <- demo_stim()
ctem <- crop_tem(stimuli, each = TRUE)
draw_tem(ctem)
# }
# NOT RUN {
# demo with different templates
stimuli <- demo_tems()
# default 10 pixels around maximum template
crop_tem(stimuli)
# crop specific to each image
crop_tem(stimuli, each = TRUE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab