tinieR

más pequeño

La imagen de contracción se presenta con la API TinyPng.

Desde el sitio web de TinyPng: "TinyPng utiliza técnicas de compresión de pérdida de pérdida inteligente para reducir el tamaño del archivo de sus archivos. Al disminuir selectivamente el número de colores en la imagen, se requieren menos bytes para almacenar los datos. El efecto es casi invisible pero hace un ¡Muy grande diferencia en el tamaño del archivo! "

Original:	Tinificado:
Ejemplo.png: 35.6 kb	ejemplo_tiny.png: 10.8 kb

Panda emoji de Sofie Ascherl, de Openmoji

Tinier funciona con archivos .png y .jpg/.jpeg, y puede devolver la nueva imagen FilePath para habilitar la incrustación en otros flujos de trabajo/funciones de imagen.

Instalación

Puede instalar la última versión de Tinier desde GitHub con:

 # install.packages("devtools")
devtools :: install_github( " jmablog/tinieR " )

Autenticación con tinypng

Necesitará una clave API de TinyPng. Puedes registrarte para conseguir uno aquí.

Una vez que tenga su clave API, puede configurarla para su sesión R actual con:

library( tinieR )

tinify_key( " YOUR-API-KEY-HERE " )

¡Tenga cuidado con su clave API en cualquier guión que escriba, especialmente si va a compartir pública o en privado esos scripts con otros! Puede considerar configurar su clave API en su archivo .Renviron (~/.Renviron). Si usa el nombre de la variable TINY_API en .Renviron, tinify() debería encontrarlo, y puede omitir usando tinify_api() o proporcionar una API en cada llamada de tinify() .

Uso básico

Con imágenes existentes

Para reducir el tamaño de un archivo de imagen, proporcione una ruta al archivo en relación con el directorio de trabajo actual para tinify() ::

tinify( " example.png " )

# > Filesize reduced by 50%:
# > example.png (20K) => example_tiny.png (10K)
# > 10 Tinify API calls this month

De forma predeterminada, tinify() creará un nuevo archivo con el sufijo '_tiny' en el mismo directorio que el archivo original.

Con tramas

Para guardar un diagrama en un archivo y encoger automáticamente el tamaño de ese archivo, simplemente llame a petit_plot() después de la gráfica:

plot( mtcars $ mpg , mtcars $ drat )

petit_plot( filename = " mtcars " )

O proporcione un objeto de gráfico GGPLOT a petit_ggplot() ::

 p <- ggplot( data = palmerpenguins :: penguins ,
            aes( flipper_length_mm , body_mass_g )) +
     geom_point(aes( color = species )
     
petit_ggplot( filename = " penguins " , plot = p )

Uso avanzado

Para obtener detalles sobre todas las opciones que proporciona Tinier , consulte la viñeta "Tutorial completo" aquí.

Para establecer las opciones predeterminadas para usar con tinify() , consulte la viñeta "Configuración de opciones predeterminadas".