fit <- gbm(Crop_Damage ~ Estimated_Insects_Count+Crop_Type+ Soil_Type
       +Pesticide_Use_Category+Number_Doses_Week+Number_Weeks_Used
       +Number_Weeks_Quit+Season,
       data = mydata, distribution="multinomial")
gbmpred <- predict(fit,mydata,n.trees = fit$n.trees)
I tried above code but it gives me probabilities.I want to get predictions
 
     
    