2013-11-06 22:37:37 +04:00
|
|
|
#include "activations.h"
|
|
|
|
|
|
|
|
#include <math.h>
|
2013-11-07 04:09:41 +04:00
|
|
|
#include <stdio.h>
|
2014-05-10 02:14:52 +04:00
|
|
|
#include <stdlib.h>
|
2013-11-07 04:09:41 +04:00
|
|
|
#include <string.h>
|
|
|
|
|
2014-02-14 22:26:31 +04:00
|
|
|
char *get_activation_string(ACTIVATION a)
|
|
|
|
{
|
|
|
|
switch(a){
|
2015-03-08 21:31:12 +03:00
|
|
|
case LOGISTIC:
|
|
|
|
return "logistic";
|
2014-02-14 22:26:31 +04:00
|
|
|
case RELU:
|
|
|
|
return "relu";
|
2015-04-11 11:24:07 +03:00
|
|
|
case RELIE:
|
|
|
|
return "relie";
|
2014-02-14 22:26:31 +04:00
|
|
|
case RAMP:
|
|
|
|
return "ramp";
|
|
|
|
case LINEAR:
|
|
|
|
return "linear";
|
|
|
|
case TANH:
|
|
|
|
return "tanh";
|
2015-03-21 22:25:14 +03:00
|
|
|
case PLSE:
|
|
|
|
return "plse";
|
2014-02-14 22:26:31 +04:00
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
return "relu";
|
|
|
|
}
|
|
|
|
|
2013-11-07 04:09:41 +04:00
|
|
|
ACTIVATION get_activation(char *s)
|
|
|
|
{
|
2015-03-08 21:31:12 +03:00
|
|
|
if (strcmp(s, "logistic")==0) return LOGISTIC;
|
2013-11-07 04:09:41 +04:00
|
|
|
if (strcmp(s, "relu")==0) return RELU;
|
2015-04-11 11:24:07 +03:00
|
|
|
if (strcmp(s, "relie")==0) return RELIE;
|
2015-03-21 22:25:14 +03:00
|
|
|
if (strcmp(s, "plse")==0) return PLSE;
|
2013-12-06 01:17:16 +04:00
|
|
|
if (strcmp(s, "linear")==0) return LINEAR;
|
2013-12-03 04:41:40 +04:00
|
|
|
if (strcmp(s, "ramp")==0) return RAMP;
|
2013-12-06 01:17:16 +04:00
|
|
|
if (strcmp(s, "tanh")==0) return TANH;
|
2013-11-07 04:09:41 +04:00
|
|
|
fprintf(stderr, "Couldn't find activation function %s, going with ReLU\n", s);
|
|
|
|
return RELU;
|
|
|
|
}
|
2013-11-06 22:37:37 +04:00
|
|
|
|
2014-08-08 23:04:15 +04:00
|
|
|
float activate(float x, ACTIVATION a)
|
2014-05-10 02:14:52 +04:00
|
|
|
{
|
2013-12-03 04:41:40 +04:00
|
|
|
switch(a){
|
2013-12-06 01:17:16 +04:00
|
|
|
case LINEAR:
|
2014-08-08 23:04:15 +04:00
|
|
|
return linear_activate(x);
|
2015-03-08 21:31:12 +03:00
|
|
|
case LOGISTIC:
|
|
|
|
return logistic_activate(x);
|
2013-12-03 04:41:40 +04:00
|
|
|
case RELU:
|
2014-08-08 23:04:15 +04:00
|
|
|
return relu_activate(x);
|
2015-04-11 11:24:07 +03:00
|
|
|
case RELIE:
|
|
|
|
return relie_activate(x);
|
2013-12-03 04:41:40 +04:00
|
|
|
case RAMP:
|
2014-08-08 23:04:15 +04:00
|
|
|
return ramp_activate(x);
|
2013-12-06 01:17:16 +04:00
|
|
|
case TANH:
|
2014-08-08 23:04:15 +04:00
|
|
|
return tanh_activate(x);
|
2015-03-21 22:25:14 +03:00
|
|
|
case PLSE:
|
|
|
|
return plse_activate(x);
|
2013-12-03 04:41:40 +04:00
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
2014-05-01 03:17:40 +04:00
|
|
|
|
2014-08-08 23:04:15 +04:00
|
|
|
void activate_array(float *x, const int n, const ACTIVATION a)
|
2014-05-01 03:17:40 +04:00
|
|
|
{
|
|
|
|
int i;
|
|
|
|
for(i = 0; i < n; ++i){
|
2014-08-08 23:04:15 +04:00
|
|
|
x[i] = activate(x[i], a);
|
2014-05-01 03:17:40 +04:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2014-08-28 06:11:46 +04:00
|
|
|
float gradient(float x, ACTIVATION a)
|
|
|
|
{
|
2013-12-03 04:41:40 +04:00
|
|
|
switch(a){
|
2013-12-06 01:17:16 +04:00
|
|
|
case LINEAR:
|
2014-08-28 06:11:46 +04:00
|
|
|
return linear_gradient(x);
|
2015-03-08 21:31:12 +03:00
|
|
|
case LOGISTIC:
|
|
|
|
return logistic_gradient(x);
|
2013-12-03 04:41:40 +04:00
|
|
|
case RELU:
|
2014-08-28 06:11:46 +04:00
|
|
|
return relu_gradient(x);
|
2015-04-11 11:24:07 +03:00
|
|
|
case RELIE:
|
|
|
|
return relie_gradient(x);
|
2013-12-03 04:41:40 +04:00
|
|
|
case RAMP:
|
2014-08-28 06:11:46 +04:00
|
|
|
return ramp_gradient(x);
|
2013-12-06 01:17:16 +04:00
|
|
|
case TANH:
|
2014-08-28 06:11:46 +04:00
|
|
|
return tanh_gradient(x);
|
2015-03-21 22:25:14 +03:00
|
|
|
case PLSE:
|
|
|
|
return plse_gradient(x);
|
2013-12-03 04:41:40 +04:00
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2014-05-01 03:17:40 +04:00
|
|
|
void gradient_array(const float *x, const int n, const ACTIVATION a, float *delta)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
for(i = 0; i < n; ++i){
|
|
|
|
delta[i] *= gradient(x[i], a);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|