How can I check whether a function call results in a warning?

by

If you want to use the try constructs, you can set the options for warn. See also ?options. Better is to use tryCatch() :

x <- function(i){
  if (i < 10) warning("A warning")
  i
}

tt <- tryCatch(x(5),error=function(e) e, warning=function(w) w)

tt2 <- tryCatch(x(15),error=function(e) e, warning=function(w) w)

tt
## <simpleWarning in x(5): A warning>

tt2
## [1] 15

if(is(tt,"warning")) print("KOOKOO")
## [1] "KOOKOO"

if(is(tt2,"warning")) print("KOOKOO")

To get both the result and the warning : 

tryCatch(x(5),warning=function(w) return(list(x(5),w)))

## [[1]]
## [1] 5
## 
## [[2]]
## <simpleWarning in x(5): A warning>

Using try

op <- options(warn=2)

tt <- try(x())
ifelse(is(tt,"try-error"),"There was a warning or an error","OK")
options(op)

More Related Contents:

  1. Extract month and year from a zoo::yearmon object
  2. How do I combine two data-frames based on two columns? [duplicate]
  3. Unique on a dataframe with only selected columns
  4. Subsetting R data frame results in mysterious NA rows
  5. Finding percentage in a sub-group using group_by and summarise
  6. Count NAs per row in dataframe [duplicate]
  7. filter for complete cases in data.frame using dplyr (case-wise deletion)
  8. Reduce PDF file size of plots by filtering hidden objects
  9. Prime number function in R
  10. Add a prefix to column names
  11. ggplot2 heatmap with colors for ranged values
  12. Setting absolute size of facets in ggplot2
  13. ggplot2 plot without axes, legends, etc
  14. Splitting a file name into name,extension
  15. R – ordering in boxplot
  16. How to get google search results
  17. How to delete groups containing less than 3 rows of data in R? [duplicate]
  18. Venn diagram proportional and color shading with semi-transparency
  19. Delete a column in a data frame within a list
  20. Call by reference in R (using function to modify an object)
  21. Loop in R: how to save the outputs?
  22. Remove all duplicate rows including the “reference” row [duplicate]
  23. Replace contents of factor column in R dataframe
  24. Remove facet_wrap labels completely
  25. R: sample() command subject to a constraint
  26. Save imported csv data in vector – R
  27. Obtaining connected components of neighboring values
  28. Aggregating all unique values of each column of data frame
  29. error in strsplit when trying to separate by a comma
  30. Administrative regions map of a country with ggmap and ggplot2

Leave a Comment