| | |
| | | #include "data.h" |
| | | #include "list.h" |
| | | #include "utils.h" |
| | | #include "image.h" |
| | | |
| | |
| | | { |
| | | char *path; |
| | | FILE *file = fopen(filename, "r"); |
| | | if(!file) file_error(filename); |
| | | list *lines = make_list(); |
| | | while((path=fgetl(file))){ |
| | | list_insert(lines, path); |
| | |
| | | return lines; |
| | | } |
| | | |
| | | void fill_truth(char *path, char **labels, int k, double *truth) |
| | | void fill_truth(char *path, char **labels, int k, float *truth) |
| | | { |
| | | int i; |
| | | memset(truth, 0, k*sizeof(double)); |
| | | memset(truth, 0, k*sizeof(float)); |
| | | for(i = 0; i < k; ++i){ |
| | | if(strstr(path, labels[i])){ |
| | | truth[i] = 1; |
| | |
| | | } |
| | | } |
| | | |
| | | data load_data_image_paths(char **paths, int n, char **labels, int k) |
| | | data load_data_image_paths(char **paths, int n, char **labels, int k, int h, int w) |
| | | { |
| | | int i; |
| | | data d; |
| | | d.shallow = 0; |
| | | d.X.rows = n; |
| | | d.X.vals = calloc(d.X.rows, sizeof(double*)); |
| | | d.X.vals = calloc(d.X.rows, sizeof(float*)); |
| | | d.X.cols = 0; |
| | | d.y = make_matrix(n, k); |
| | | |
| | | for(i = 0; i < n; ++i){ |
| | | image im = load_image(paths[i]); |
| | | image im = load_image(paths[i], h, w); |
| | | d.X.vals[i] = im.data; |
| | | d.X.cols = im.h*im.w*im.c; |
| | | fill_truth(paths[i], labels, k, d.y.vals[i]); |
| | |
| | | return d; |
| | | } |
| | | |
| | | data load_data_image_pathfile(char *filename, char **labels, int k) |
| | | data load_data_image_pathfile(char *filename, char **labels, int k, int h, int w) |
| | | { |
| | | list *plist = get_paths(filename); |
| | | char **paths = (char **)list_to_array(plist); |
| | | data d = load_data_image_paths(paths, plist->size, labels, k); |
| | | data d = load_data_image_paths(paths, plist->size, labels, k, h, w); |
| | | free_list_contents(plist); |
| | | free_list(plist); |
| | | free(paths); |
| | |
| | | } |
| | | } |
| | | |
| | | data load_data_image_pathfile_part(char *filename, int part, int total, char **labels, int k) |
| | | data load_data_image_pathfile_part(char *filename, int part, int total, char **labels, int k, int h, int w) |
| | | { |
| | | list *plist = get_paths(filename); |
| | | char **paths = (char **)list_to_array(plist); |
| | | int start = part*plist->size/total; |
| | | int end = (part+1)*plist->size/total; |
| | | data d = load_data_image_paths(paths+start, end-start, labels, k); |
| | | data d = load_data_image_paths(paths+start, end-start, labels, k, h, w); |
| | | free_list_contents(plist); |
| | | free_list(plist); |
| | | free(paths); |
| | | return d; |
| | | } |
| | | |
| | | data load_data_image_pathfile_random(char *filename, int n, char **labels, int k) |
| | | data load_data_image_pathfile_random(char *filename, int n, char **labels, int k, int h, int w) |
| | | { |
| | | int i; |
| | | list *plist = get_paths(filename); |
| | |
| | | for(i = 0; i < n; ++i){ |
| | | int index = rand()%plist->size; |
| | | random_paths[i] = paths[index]; |
| | | if(i == 0) printf("%s\n", paths[index]); |
| | | } |
| | | data d = load_data_image_paths(random_paths, n, labels, k); |
| | | data d = load_data_image_paths(random_paths, n, labels, k, h, w); |
| | | free_list_contents(plist); |
| | | free_list(plist); |
| | | free(paths); |
| | |
| | | data d; |
| | | d.shallow = 0; |
| | | matrix X = csv_to_matrix(filename); |
| | | double *truth_1d = pop_column(&X, target); |
| | | double **truth = one_hot_encode(truth_1d, X.rows, k); |
| | | float *truth_1d = pop_column(&X, target); |
| | | float **truth = one_hot_encode(truth_1d, X.rows, k); |
| | | matrix y; |
| | | y.rows = X.rows; |
| | | y.cols = k; |
| | |
| | | return d; |
| | | } |
| | | |
| | | data load_cifar10_data(char *filename) |
| | | { |
| | | data d; |
| | | d.shallow = 0; |
| | | long i,j; |
| | | matrix X = make_matrix(10000, 3072); |
| | | matrix y = make_matrix(10000, 10); |
| | | d.X = X; |
| | | d.y = y; |
| | | |
| | | FILE *fp = fopen(filename, "rb"); |
| | | if(!fp) file_error(filename); |
| | | for(i = 0; i < 10000; ++i){ |
| | | unsigned char bytes[3073]; |
| | | fread(bytes, 1, 3073, fp); |
| | | int class = bytes[0]; |
| | | y.vals[i][class] = 1; |
| | | for(j = 0; j < X.cols; ++j){ |
| | | X.vals[i][j] = (double)bytes[j+1]; |
| | | } |
| | | } |
| | | translate_data_rows(d, -144); |
| | | scale_data_rows(d, 1./128); |
| | | //normalize_data_rows(d); |
| | | fclose(fp); |
| | | return d; |
| | | } |
| | | |
| | | data load_all_cifar10() |
| | | { |
| | | data d; |
| | | d.shallow = 0; |
| | | int i,j,b; |
| | | matrix X = make_matrix(50000, 3072); |
| | | matrix y = make_matrix(50000, 10); |
| | | d.X = X; |
| | | d.y = y; |
| | | |
| | | |
| | | for(b = 0; b < 5; ++b){ |
| | | char buff[256]; |
| | | sprintf(buff, "data/cifar10/data_batch_%d.bin", b+1); |
| | | FILE *fp = fopen(buff, "rb"); |
| | | if(!fp) file_error(buff); |
| | | for(i = 0; i < 10000; ++i){ |
| | | unsigned char bytes[3073]; |
| | | fread(bytes, 1, 3073, fp); |
| | | int class = bytes[0]; |
| | | y.vals[i+b*10000][class] = 1; |
| | | for(j = 0; j < X.cols; ++j){ |
| | | X.vals[i+b*10000][j] = (double)bytes[j+1]; |
| | | } |
| | | } |
| | | fclose(fp); |
| | | } |
| | | //normalize_data_rows(d); |
| | | translate_data_rows(d, -144); |
| | | scale_data_rows(d, 1./128); |
| | | return d; |
| | | } |
| | | |
| | | void randomize_data(data d) |
| | | { |
| | | int i; |
| | | for(i = d.X.rows-1; i > 0; --i){ |
| | | int index = rand()%i; |
| | | double *swap = d.X.vals[index]; |
| | | float *swap = d.X.vals[index]; |
| | | d.X.vals[index] = d.X.vals[i]; |
| | | d.X.vals[i] = swap; |
| | | |
| | |
| | | } |
| | | } |
| | | |
| | | void scale_data_rows(data d, float s) |
| | | { |
| | | int i; |
| | | for(i = 0; i < d.X.rows; ++i){ |
| | | scale_array(d.X.vals[i], d.X.cols, s); |
| | | } |
| | | } |
| | | |
| | | void translate_data_rows(data d, float s) |
| | | { |
| | | int i; |
| | | for(i = 0; i < d.X.rows; ++i){ |
| | | translate_array(d.X.vals[i], d.X.cols, s); |
| | | } |
| | | } |
| | | |
| | | void normalize_data_rows(data d) |
| | | { |
| | | int i; |
| | |
| | | } |
| | | } |
| | | |
| | | data *cv_split_data(data d, int part, int total) |
| | | data *split_data(data d, int part, int total) |
| | | { |
| | | data *split = calloc(2, sizeof(data)); |
| | | int i; |
| | |
| | | train.X.rows = train.y.rows = d.X.rows - (end-start); |
| | | train.X.cols = test.X.cols = d.X.cols; |
| | | train.y.cols = test.y.cols = d.y.cols; |
| | | |
| | | train.X.vals = calloc(train.X.rows, sizeof(float*)); |
| | | test.X.vals = calloc(test.X.rows, sizeof(float*)); |
| | | train.y.vals = calloc(train.y.rows, sizeof(float*)); |
| | | test.y.vals = calloc(test.y.rows, sizeof(float*)); |
| | | |
| | | for(i = 0; i < start; ++i){ |
| | | train.X.vals[i] = d.X.vals[i]; |
| | | train.y.vals[i] = d.y.vals[i]; |
| | |
| | | test.y.vals[i-start] = d.y.vals[i]; |
| | | } |
| | | for(i = end; i < d.X.rows; ++i){ |
| | | train.X.vals[i-(start-end)] = d.X.vals[i]; |
| | | train.y.vals[i-(start-end)] = d.y.vals[i]; |
| | | train.X.vals[i-(end-start)] = d.X.vals[i]; |
| | | train.y.vals[i-(end-start)] = d.y.vals[i]; |
| | | } |
| | | split[0] = train; |
| | | split[1] = test; |