Boa tarde listeiros, Estou executando a seguinte rotina para obter os parâmetros de weibull num dado intervalo de velocidades de vento.Fiz um servidor linux numa placa raspberry pi3 e estou usando MySQL, R, PHP e hospedando um site onde retorno os valores calculados. A questão é que demora demais para calcular, quase um minuto e meio.No computador é menos de 10s. Entendo que existe questões de memória e processamento.Hoje o intervalo de busca no banco de dados é fixo, futuramente vai ser variável, logo, a cada busca demorará 1:30 min para ter a resposta.A questão é, existe forma de agilizar esse cálculo? Pensei até em criar um server exclusivo para R, mas não encontrei muito material a respeito. library(DBI, quietly = TRUE)library(fitdistrplus, quietly = TRUE)library(RMySQL, quietly = TRUE) mydb = dbConnect(MySQL(), user=.........., password=......., dbname=......., host=...................)rs = dbSendQuery(mydb, "SELECT vento_12m FROM weibull_points WHERE vento_12m >=0 AND vento_12m < 15.75 ORDER BY datetime DESC")data = fetch(rs, n=-1) fw = fitdistr(as.numeric(data$vento_12m), densfun = "weibull", lower = 0)forma= fw$estimate[1]escala = fw$estimate[2] query <- paste0("INSERT INTO weibull_curva_12m (fator_forma_k, fator_escala_c) VALUES ('",fw$estimate[1],"','", fw$estimate[2],"')")grava = dbSendQuery(mydb, query)dev.off() --Leonardo de Oliveira FerrãoEletrotécnico - CREA/RS 198702Administrador - CRA/RS 049456 Engenheiro de Controle e AutomaçãoUniversidade Federal de Santa Maria - UFSM Skype: leonardo.ferraoCelular (55) 99715-0343Residencial (55) 3221-6743