updating appdeploy samples

This commit is contained in:
Jeroen ter Heerdt
2019-03-01 16:09:28 -08:00
parent ebf5846f2a
commit af427976bc
4 changed files with 2 additions and 12 deletions
@@ -6,7 +6,6 @@
##
#####################################################
#####################################################
#install.packages("TeachingDemos")
# Note if you choose > 10 as the number of dice the app fails as it is not able to handle Null or N/A which are the default lables for the colors
rollEm <- function(numDice = 2)
@@ -21,8 +20,4 @@ rollEm <- function(numDice = 2)
return(as.data.frame(r))
}
else {"Oops we have not quite figued this out... number of dice need to be less than or equal to 10!"}
}
result<-rollEm(x)
}
@@ -1,4 +1,3 @@
def add(x,y):
result = x+y
return result;
result=add(x,y)
return result
@@ -34,6 +34,3 @@ def magic8ball(txt):
msg="My sources say no"
return msg
#quizme="SQL Server Big Data Cluster is awesome"
result =magic8ball(txt)
@@ -1,4 +1,3 @@
sofsq <- function(a,b) {
a^2 + b^2
}
result <- sofsq (a,b)