Create indirect.R