if (FALSE) {
#----------------------------------------------------------------------------
# Blimp Example 4.3: Linear Regression
# Example 1a: Default setting
blimp.print("Ex4.3.blimp-out")
# Example 1c: Print OUTCOME MODEL ESTIMATES only
blimp.print("Ex4.3.blimp-out", result = "out.model")
# Example 1d: Print MODEL FIT in addition to the default setting
blimp.print("Ex4.3.blimp-out", result = c("default", "fit"))
# Example 1e: Exclude DATA INFORMATION section
blimp.print("Ex4.3.blimp-out", exclude = "data.info")
# Example 1f: Print all result sections, but exclude MODEL FIT section
blimp.print("Ex4.3.blimp-out", result = "all", exclude = "fit")
# Example 1g: Print result section in a different order
blimp.print("Ex4.3.blimp-out", result = c("model.info", "fit", "algo.options"))
#----------------------------------------------------------------------------
# misty.object of type 'blimp.print'
# Example 2
# Create misty.object
object <- blimp.print("Ex4.3.blimp-out", output = FALSE)
# Print misty.object
blimp.print(object)
#----------------------------------------------------------------------------
# Write Results
# Example 3: Write Results into a text file
blimp.print("Ex4.3.blimp-out", write = "Output_4-3.txt")
}
Run the code above in your browser using DataLab