Running examples in 'SetMethods-Ex.R' failed
The error most likely occurred in:

> ### Name: pimplot
> ### Title: Prime implicants, truth table rows, and necessity plots.
> ### Aliases: pimplot
> ### Keywords: QCA
> 
> ### ** Examples
> 
> # Import your data. For example:
> 
> data(SCHF)
> 
> # Get the parsimonious solution:
> 
> 
> sol_yp <- minimize(SCHF, outcome = "EXPORT",
+                 conditions = c("EMP","BARGAIN","UNI","OCCUP","STOCK", "MA"),
+                 incl.cut = .9, 
+                 include = "?", 					   
+                 details = TRUE, show.cases = TRUE)
> 
> # Get the intermediate solution:
> 
> sol_yi <- minimize(SCHF, outcome = "EXPORT",
+                 conditions = c("EMP","BARGAIN","UNI","OCCUP","STOCK", "MA"),
+                 incl.cut = .9, 
+                 include = "?", 					   
+                 details = TRUE, show.cases = TRUE, dir.exp = c(0,0,0,0,0,0))
> 
> # Plot the prime implicants of the parsimonious solution:
> 
> pimplot(data = SCHF, results = sol_yp, outcome = "EXPORT")
> 
> # Plot the prime implicants of the first intermediate solution showing all case labels:
> 
> pimplot(data = SCHF, results = sol_yi, outcome = "EXPORT", sol = 1, all_labels = TRUE)
> 
> # Plot all truth table rows with a consistency higher than 0.9:
> 
> pimplot(data=SCHF, results = sol_yi, incl.tt=0.9, outcome = "EXPORT", sol = 1)
> 
> # Plot truth table rows "60" and "61":
> 
> pimplot(data=SCHF, results = sol_yi, ttrows =c("60","61"), 
+         outcome = "EXPORT", sol = 1)
> 
> # For plotting results of necessity analyses using superSubset,
> # the first stept is to obtain an "sS" object:
> 
> SUPSUB <- superSubset(SCHF, outcome="EXPORT", 
+                       conditions = c("EMP","BARGAIN","UNI","OCCUP","STOCK", "MA"), 
+                       relation = "necessity", incl.cut = 0.8)
> SUPSUB

Error in `[<-.data.frame`(`*tmp*`, NAs, i, value = "  -  ") : 
  replacement has 1 row, data has 0
Calls: <Anonymous> -> print.sS -> [<- -> [<-.data.frame
Execution halted