if (AlteryxFullUpdate) {
m.data <- read.AlteryxMetaInfo("#1")
lapply(seq(nrow(m.data)), function(x) {
col <- m.data[x,]
write.AlteryxAddFieldMetaInfo(nOutput = 1,
name = as.character(col$Name),
fieldType = as.character(col$Type),
size = col$Size,
scale = col$Scale)
})
} else {
data <- read.Alteryx("#1", mode="data.frame")
write.Alteryx(data, 1)
}
C:\ProgramData\Alteryx\Engine\Engine_6816_2fb0a655f71747978a142fe73d676e6e_\Engine_3924_7e9bd106939e4fefa158135724af968c_.yxdb
1
2
3
four
T
Horizontal
input-rds