Skip to main content
cancel
Showing results for 
Search instead for 
Did you mean: 

The Power BI DataViz World Championships are on! With four chances to enter, you could win a spot in the LIVE Grand Finale in Las Vegas. Show off your skills.

Reply
Anonymous
Not applicable

How to use R script in power query ? for populating Column using if condition in R SCRIPT

Hi

I have a table A(exist in power bi data model)

Table A
IDNameFlag
111alexF
222padianT
333heyoT
444yopeF

I want to create a new column 'Flad des' using 'Flag column' by if condition in R SCRIPT, find the below exepected output for your reference.
O/P:

Table A
IDNameFlagFlag des
111alexFFALSE
222padianTTRUE
333heyoTTRUE
444yopeFFALSE


If you could help me it would be helpfull, also please share me the screehot if possible .

 

Thanks in advance

 

1 ACCEPTED SOLUTION
v-xuding-msft
Community Support
Community Support

Hi @Anonymous ,

 

Please try this:

 


dataset$Flag_des <- ifelse(dataset$Flag,"True","False")
output <- dataset

 

 

 

let
    Source = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("i45WMjQ0VNJRSsxJrQBSbkqxOtFKRkZGQHZBYkpmYh6QEQIWNDY2BrIzUivz4UImJiZAdmV+QSpEaywA", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type nullable text) meta [Serialized.Text = true]) in type table [ID = _t, Name = _t, Flag = _t]),
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"ID", Int64.Type}, {"Name", type text}, {"Flag", type text}}),
    #"Run R script" = R.Execute("# 'dataset' holds the input data for this script#(lf)  #(lf)dataset$Flag_des <- ifelse(dataset$Flag ,""True"",""False"")#(lf)output <- dataset",[dataset=#"Changed Type"]),
    #"""output""" = #"Run R script"{[Name="output"]}[Value]
in
    #"""output"""

 

v-xuding-msft_0-1600250902132.png

 

Best Regards,
Xue Ding
If this post helps, then please consider Accept it as the solution to help the other members find it more quickly.

View solution in original post

2 REPLIES 2
v-xuding-msft
Community Support
Community Support

Hi @Anonymous ,

 

Please try this:

 


dataset$Flag_des <- ifelse(dataset$Flag,"True","False")
output <- dataset

 

 

 

let
    Source = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("i45WMjQ0VNJRSsxJrQBSbkqxOtFKRkZGQHZBYkpmYh6QEQIWNDY2BrIzUivz4UImJiZAdmV+QSpEaywA", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type nullable text) meta [Serialized.Text = true]) in type table [ID = _t, Name = _t, Flag = _t]),
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"ID", Int64.Type}, {"Name", type text}, {"Flag", type text}}),
    #"Run R script" = R.Execute("# 'dataset' holds the input data for this script#(lf)  #(lf)dataset$Flag_des <- ifelse(dataset$Flag ,""True"",""False"")#(lf)output <- dataset",[dataset=#"Changed Type"]),
    #"""output""" = #"Run R script"{[Name="output"]}[Value]
in
    #"""output"""

 

v-xuding-msft_0-1600250902132.png

 

Best Regards,
Xue Ding
If this post helps, then please consider Accept it as the solution to help the other members find it more quickly.
Greg_Deckler
Super User
Super User

@Anonymous - 

Greg_Deckler_0-1599131818691.png

 



Follow on LinkedIn
@ me in replies or I'll lose your thread!!!
Instead of a Kudo, please vote for this idea
Become an expert!: Enterprise DNA
External Tools: MSHGQM
YouTube Channel!: Microsoft Hates Greg
Latest book!:
Power BI Cookbook Third Edition (Color)

DAX is easy, CALCULATE makes DAX hard...

Helpful resources

Announcements
Las Vegas 2025

Join us at the Microsoft Fabric Community Conference

March 31 - April 2, 2025, in Las Vegas, Nevada. Use code MSCUST for a $150 discount!

FebPBI_Carousel

Power BI Monthly Update - February 2025

Check out the February 2025 Power BI update to learn about new features.

Feb2025 NL Carousel

Fabric Community Update - February 2025

Find out what's new and trending in the Fabric community.

Top Solution Authors