Skip to main content
1 de 2
Uko
  • 151
  • 1
  • 9

Crear data.table y exportar a txt

El objetivo final es crear un txt donde cada fila es distinta. Para ello tengo distinas variables con distintos valores que se van a ir combinando. La solución que aporto no me parece la mas adecuado ya que si el numero de valores es mayor el codigo a escribir seria muy largo, quizas un for, la problematica q veo que la primera linea de la salida es distinta a las siguientes, y q se volverai a repetir para un nuevo valor de la variable personas.

personas <- data.table(c("Luis","Pedro","Mar"))

año <- "2018"

mes <-"05"

dia <- "23"

dia2 <- data.table(c("lunes","martes","miercoles","jueves","Viernes"))

salida <-data.table(paste(año,mes,dia,personas[1],"&",sep=""), paste(año,mes,dia,personas[1],dia2[1],"&",sep=""), paste(año,mes,dia,personas[1],dia2[2],"&",sep=""), paste(año,mes,dia,personas[1],dia2[3],"&",sep=""), paste(año,mes,dia,personas[1],dia2[4],"&",sep=""), paste(año,mes,dia,personas[1],dia2[5],"&",sep=""), paste(año,mes,dia,personas[2],dia2[1],"&",sep=""), paste(año,mes,dia,personas[2],dia2[2],"&",sep=""), paste(año,mes,dia,personas[2],dia2[3],"&",sep=""), paste(año,mes,dia,personas[2],dia2[4],"&",sep=""), paste(año,mes,dia,personas[2],dia2[5],"&",sep=""), paste(año,mes,dia,personas[3],dia2[1],"&",sep=""), paste(año,mes,dia,personas[3],dia2[2],"&",sep=""), paste(año,mes,dia,personas[3],dia2[3],"&",sep=""), paste(año,mes,dia,personas[3],dia2[4],"&",sep=""), paste(año,mes,dia,personas[3],dia2[5],"&",sep=""))

salida

salida2 <- t(salida)

La salida que obtengo es:

[,1]                     

V1 "20180524Luis&"
V2 "20180524Luislunes&"
V3 "20180524Luismartes&"
V4 "20180524Luismiercoles&" V5 "20180524Luisjueves&"
V6 "20180524LuisViernes&"
V7 "20180524Pedrolunes&"
V8 "20180524Pedromartes&"
V9 "20180524Pedromiercoles&" V10 "20180524Pedrojueves&"
V11 "20180524PedroViernes&"
V12 "20180524Marlunes&"
V13 "20180524Marmartes&"
V14 "20180524Marmiercoles&"
V15 "20180524Marjueves&"
V16 "20180524MarViernes&"

Faltaria la exportacion a txt donde quitaria los nombres de fila y de columna.

¿Alguien podria aportarme otra solucion mejor?

Gracias.

Uko
  • 151
  • 1
  • 9