在之后,我现在编写我的第二个R函数,并使用类似的逻辑。然而,我正在尝试更多的自动化,并且可能变得太聪明了,这对我自己来说是件好事。# sample dataorders <- round(runif(200,min=1, max=50),0)
#function to break them into quinti
doINeedTo As BooleanDim randomnumberthingy As IntegerDim quartile3 As IntegerDim upper As Integerquantity= WorksheetFunction.Quartile(totalsalesthatday, 1)
quart