R/crossEntropy.R
In TeachNet: Fits Neural Networks to Learn About Backpropagation

crossEntropy <- function(x,y) {
  if(y==1) {return(-log(x))}
  else {return(-log(1-x))}
}

Any scripts or data that you put into this service are public.

TeachNet documentation built on May 2, 2019, 7 a.m.

Note that we can't provide technical support on individual packages. You should contact the package authors for that.

Try the TeachNet package in your browser