Dynamic Pivot

I love the functionality of dynamic unpivot for transforming my data vertically, I would love to see a similar functionality for adding columns

Tagged:
7
7 votes

Comments

  • I think I got this to work using the R scripts. I did it in 2 steps, because I am not that savvy in R.

    !!!— here is the first Rscript tile, the purpose of this is to make all the names of my new columns in a format R can use, the column that houses my names is called PARTNO —-!!!

    Import the domomagic library into the script.

    library('domomagic')
    library('janitor')
    library('tidyverse')

    read data from inputs into a data frame

    input1 <- read.dataframe('Filter Rows')

    write your script here

    input1 <- input1 |>
    mutate(
    PARTNO = tolower(PARTNO),
    PARTNO = trimws(PARTNO),
    PARTNO = gsub("[^[:alnum:]]", "", PARTNO),
    PARTNO = gsub("
    +", "_", PARTNO)
    )

    write a data frame so it's available to the next action

    write.dataframe(input1)

    !!!—- this is the second tile, I am making columns with the name in PARTNO, and the vlues from DATA1—-!!!


    Import the domomagic library into the script.

    library('domomagic')
    library('tidyverse')
    library('janitor')

    read data from inputs into a data frame

    input1 <- read.dataframe('Select Columns')

    write your script here

    input2 <- pivot_wider(
    input1,
    names_from = PARTNO,
    values_from = DATA1,
    values_fill = 0
    )

    write a data frame so it's available to the next action

    write.dataframe(input2)