Power BI Advanced Visual & R: Simulate 3D Quadratic Surface in R Script Visual

 



In the video I have shared the detail steps and R script codes on creating 3D quadratic surface plot in power BI desktop. With changing the 8 parameter slicers in power BI visual we are able to simulate the different types of 3D quadratic surface with the View Angels at the levels of Horizontal and Vertical. The R package Lattice and function Wireframe are applied to plot the 3D quadratic Surface. The link of the R script codes for the video I have attached in the video descriptions in below. Hope this video brings some help for your project developments.


R Scripts for the demo:


# Load the lattice package:

library(lattice)


# Create Parameter Variable for rotating view angles

HAngles=dataset$H_Angle

VAngles=dataset$V_Angle


# Create coefficient Prameter Variables:

a = dataset$a

b = dataset$b

c = dataset$c

d = dataset$d

e = dataset$e

f = dataset$f


# Create data for a quadratic surface

x <- seq(-5, 5, length.out = 100)

y <- seq(-5, 5, length.out = 100)

# z <- outer(x, y, function(x, y) a*x^2 + b*y^2)

z <- outer(x, y, function(x, y) a*x^2 + b*y^2 + c*x*y + d*x + e*y+f)


# Create a wireframe plot of the quadratic surface

wireframe(z ~ x * y, data = expand.grid(x = x, y = y), color = "blue", drape = TRUE,

          scales = list(arrows = FALSE),

          main = "Quadratic Surface",

          xlab = "X Axis", 

          ylab = "Y Axis", 

          zlab = "Z Axis",

          screen = list(z = HAngles, x = -VAngles))

Comments

Post a Comment

Popular posts from this blog

Power BI DAX Formula for Dynamic Ranking Calculations Based on User Selections and Filters

Image
  The Youtube Vidoe:  Power BI DAX: Dynamic Ranking Calculations Based on User Selections and Filters         DAX formulas from the Video: Total Opp count = DISTINCTCOUNTNOBLANK('Fact'[Opportunity ID]) Total P_Revenue = SUM('Fact'[ProductRevenue]) Total F_P_Revenue = SUM('Fact'[FactoredProductRevenue]) Selected KPIs = SELECTEDVALUE('Table_KPIs'[KPI Name]) Account value rank index =      SWITCH(         TRUE(),         [Selected KPIs]="Opportunity Numbers",RANKX(ALL('Account'[Account]),[Total Opp count],,,Dense),         [Selected KPIs]="Product Revenues",RANKX(ALL('Account'[Account]),[Total P_Revenue],,,Dense),         [Selected KPIs]="Factored Product Revenues",RANKX(ALL('Account'[Account]),[Total F_P_Revenue],,,Dense)     ) Account KPI values for sorting =      SWITCH(         TRUE(),         ...
Read more

Power BI DAX and Visualizations: Active employees across time (as x-axis) by Tenure group or age group

Image
Business Case raised by my youtube channel viewer on the 21st July 2023. In my employee tenure data, it has employee birthday, hire date and leaving date, and race, gender, etc. Do you have any idea how to create a dynamic measure of tenure and/or age, as well as a "tenure group" and "age group" that can change with the calendar date? I would like to show in a line chart the changing number of active employees across time (as x-axis). Furthermore, I would like to breakdown the number of employees by their age group or tenure group (using age group as a legend). The age or tenure group will be dynamically change according to the dates in the X-axis. Any suggestions are appreciated. My suggestions: Assumptions on what we have for the case:                         - an employee table with coloumns: table update(or registered) date,              ...
Read more

Excel VBA Tips: A Macro to Generate Line Chart Dynamically for Loan Schedule Trend Report

Image
The entire code shared in this video is designed to automate the process of creating a dynamic line chart based on loan data in the "Loan Report" sheet and display the chart on the "Charts" sheet. The chart shows trends in accumulated principal, accumulated interest, and loan remaining balance over time. The code is also flexible enough to handle both yearly and monthly loan schedule reports. The VBA codes as: Sub CreateLineChart()       '1. Variable Declarations     Dim srcSheet As Worksheet     Dim chtSheet As Worksheet     Dim lastRow As Long     Dim chartObj As Shape     Dim chartDataRange As Range     Dim xAxisRange As Range     Dim yAxisRange As Range     Dim colPrincipal As Variant     Dim colInterest As Variant     Dim colRemainingBalance, ColMonth As Variant     '2. set source and chart sheets     Set srcSheet = ThisWorkbook.Worksheets("Loa...
Read more