Marcos Armas
20 - Diciembre - 2017
Structured Query Languaje
select * from tabla
where columna = 'valor'
Es un lenguaje estandar para hacer consultas a una base de datos relacional
select usuario_de.nombre as de,
usuario_para.nombre as para,
mensajes.mensaje
from mensajes
inner join usuarios usuario_de
on mensajes.idu_de = usuario_de.idu
inner join usuarios usuario_para
and mensajes.idu_para = usuario_para.idu
where
mensaje.fecha = '2017-12-20'
Es el software que gestiona la estructura de tablas y relaciones.
En el mercado existen muchos motores de bases de datos ejemplo:
library(sqldf)
options(sqldf.RPostgreSQL.user ="user",
sqldf.RPostgreSQL.password ="pass",
sqldf.RPostgreSQL.dbname ="base",
sqldf.RPostgreSQL.host ="ip",
sqldf.RPostgreSQL.port =5432)
db <- dbConnect(PostgreSQL(), dbname = "base", host = "localhost", port = 5432, user = "postgres", password = "pass")
query <- "select * from tabla_x"
data <- dbGetQuery(db, query)
dbDisconnect(db)
data
drv <- JDBC(driverClass="oracle.jdbc.driver.OracleDriver",
classPath="/ojdbc6.jar",
identifier.quote="`")
conn <- dbConnect(drv=drv,
url="jdbc:oracle:thin:@//192.168.1.132:1521/ORAI",
user="user",
password="pass")
dbGetQuery(conn, "select * from tabla_x")
Shiny tiene un estilo sobrio y minimalista, su intencion es que las visualizaciones sean sencillas y no muy cargadas.
Si se desea cambiar el estilo (colores, fuentes, tamaños de letra) puede ser un dolor de cabeza si se los hace manualmente.
Necesitas saber CSS y HTML.
CSS: Hoja de estilo en cascada, es un archivo donde se definen estilos personalizados, se puede realizar por tag, id o clase de entrada del codigo HTML.
HTML: HyperText Markup Language, es el formato de las páginas web, hasta ahora shiny viene haciendo este trabajo.
No, no hablamos del algoritmo para remuestreo, ni del mecanismo para capitalizar una empresa, en desarrollo web es una forma de estandarizar una pagina de tal forma que puedes utilizar estilos CSS que desarrollan los diseñadores gráficos
Para nuestra buena suerte, shiny crea el html con bootstrap, lo que quiere decir que en la web podemos encontrar varios estilos.
## ui.R ##
library(shinythemes)
fluidPage(theme = shinytheme("cerulean"),
...
)
...
ui = fluidPage(
shinythemes::themeSelector(),
...
tags$div(conditionalPanel(condition="$('html').hasClass('shiny-busy')",
tags$div(id="loadmessageContainer",
tags$div(id="loadmessage","Loading...",br(),tags$div(class="loader",""))
)
)
)
ui.R
downloadButton("descargar", "Descargar datos")
server.R
output$descargar <- downloadHandler(
filename = "nacidos_vivos.csv",
content = function(file) {
write.csv(cargarDatos(), file)
}
)
Usamos la opcion de highchar hc_export
hc_exporting(enabled=T)