Nothing
R/optimal.R
In intpoint: linear programming solver by the interior point method and graphically (two dimensions)
Defines functions
optimal
optimal <-
function(C,x,e,c){
max<-0
for (i in 1:length(x))
if (x[i]*C[i]>max) max<-x[i]*C[i]
min<-max
for(i in 1:length(C))
if (C[i]<min) min<-C[i]
l<-length(c)
if (max-min*mean(x)<e/l) sol<-1 else sol<-0
return(sol)}
Try the intpoint package in your browser
Any scripts or data that you put into this service are public.
intpoint documentation built on May 29, 2017, 8:59 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Defines functions optimal
optimal <-
function(C,x,e,c){
max<-0
for (i in 1:length(x))
if (x[i]*C[i]>max) max<-x[i]*C[i]
min<-max
for(i in 1:length(C))
if (C[i]<min) min<-C[i]
l<-length(c)
if (max-min*mean(x)<e/l) sol<-1 else sol<-0
return(sol)}
Try the intpoint package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.