Cesar Aybar csaybar

Deep Learning - UNET Arequipa

	/*Singly linked list example using C++
	This code was inspired in the post of Kamal Choudhary
	https://www.codementor.io/codementorteam/a-comprehensive-guide-to
	-implementation-of-singly-linked-list-using-c_plus_plus-ondlm5azr
	and Charlie Mills https://gist.github.com/charlierm/5691020
	*/
	#include <iostream>

	using namespace std;

	# 1._Libraries ------------------------------------------------------------
	library(rvest)
	library(openNLP)
	library(NLP)
	library(stringr)
	library(tidyverse)
	options(java.parameters = "- Xmx1024m")
	blacklist <- read_table('R/blacklist.txt',col_names = F)[[1]] %>% tolower()
	blacklist <- blacklist[!duplicated(blacklist)] %>% as.character()

	hex_to_Labspace <- function(hex) {
	hextolab <- function(x)
	convertColor(x,from="sRGB",to="Lab")
	rgb_col <- col2rgb(hex)/255
	labspace <- apply(rgb_col, 2, hextolab) %>% t
	colnames(labspace) <- c('L','a','b')
	return(labspace)
	}

	Labspace_to_hex <- function(lab) {

	hex_to_Labspace <- function(hex) {
	hextolab <- function(x)
	convertColor(x,from="sRGB",to="Lab")
	rgb_col <- col2rgb(hex)/255
	labspace <- apply(rgb_col, 2, hextolab) %>% t
	colnames(labspace) <- c('L','a','b')
	return(labspace)
	}

	Labspace_to_hex <- function(lab) {