#########################################################################################
#########################################################################################

## Iris data ##

data(iris)

##########################################################################################
##########################################################################################

# Taken only 10-rows selecting all the variables ##

IRIS_DF <- data.frame(iris$Sepal.Length, iris$Sepal.Width,
iris$Petal.Length, iris$Petal.Width)
IRIS_DF_SR <- IRIS_DF[1:10,]

##########################################################################################
##########################################################################################

## DMC = Distance Matrix Computation ##

IRIS.DMC <- Dist(Iris_DF_SR, method = "euclidean", nbproc = 2, diag = FALSE,
upper = FALSE)

##########################################################################################
##########################################################################################

# "hclust" object. HCMA = HCLUST.METHOD.AVERAGE ##

IRIS_HCMA <- hclust(IRIS.DMC, method = "average", members = NULL)

##########################################################################################
##########################################################################################

# To generate a pmml for an "hclust" object  ##

pmml(IRIS_HCMA)

pmml(IRIS_HCMA, model.name="HClust_Model", app.name="Rattle/PMML",
     description="Hierarchical cluster model", copyright=NULL,
transforms=NULL, dataset=NULL)

*Error in .Internal(inherits(x, what, which)) : 'x' is missing*

##########################################################################################
##########################################################################################

For both of the functions, it is generating the above error. Please help me
finding the solution.



--
View this message in context: 
http://r.789695.n4.nabble.com/To-generate-a-pmml-for-an-hclust-object-showing-the-error-Error-in-Internal-inherits-x-what-which-x--tp4468931p4468931.html
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to