c<-.4
t<-2
a<-0; b<-10; int<-c(a,b)
IndNCSint(7,5,t,c,int)
IndNCSint(17,17,t,c,int)
IndNCSint(15,17,t,c,int)
IndNCSint(1,3,t,c,int)
IndNCSint(-17,17,t,c,int)
IndNCSint(3,5,t,c,int)
IndNCSint(3,3,t,c,int)
IndNCSint(4,5,t,c,int)
IndNCSint(a,5,t,c,int)
c<-.4
r<-2
a<-0; b<-10; int<-c(a,b)
IndNCSint(7,5,t,c,int)
Run the code above in your browser using DataLab