Cree .csv o .txt con información de fuente/derechos de autor en las primeras dos líneas para exportar desde shiny

Estoy creando una aplicación brillante para que las personas descarguen los resultados de nuestro estudio. Configuré todo dentro de shiny para que los usuarios creen su propia base de datos y un botón de descarga para devolver un csv de sus resultados. Sin embargo, necesito incluir información de derechos de autor en la parte superior del archivo csv generado, idealmente así:

Source: Data from us.
Copyright: Us.

Age   Sex      Size  
1     Male     10
2     Male     4
[...more rows...]
100   Female   1

estoy luchando por conseguir write.table or write.csv para proporcionarme este formato. Ambos pusieron los encabezados de las columnas (Edad, Sexo, Tamaño) en la parte superior de la página. Además, cuando veo el csv en Excel, la primera celda solo muestra 'Fuente: D'. Parece que no puedo obtener el texto para continuar a la siguiente celda vacía cuando uso na=" " in write.csv

preguntado el 29 de noviembre de 13 a las 11:11

Si yo fuera usted, consideraría poner eso en un README o COPYRIGHT.txt separado, y exportar todo en un archivo zip. -

acordado. aunque no es mi decisión, es como el jefe lo quiere. -

1 Respuestas

Debe utilizar una conexión de archivo. Algo así para el content submarino dentro downloadHandler:

content = function(filename) {
  fh <- file(filename, "w")
  cat(copyright_str, file = fh)
  write.csv(data, fh, row.names = FALSE)
  close(fh)
}

donde

copyright_str <- '"Source: Data from us."\n"Copyright: Us."\n\n'

respondido 29 nov., 13:13

hermoso. no sabía cat puede ir fuera de la consola R. - guayababel

No es la respuesta que estás buscando? Examinar otras preguntas etiquetadas or haz tu propia pregunta.