performGaussianMixCalculation {AFM} | R Documentation |
Perform the calculation for the Gaussian mixes
Description
performGaussianMixCalculation
perform all the calculation for PSD exploitation
Usage
performGaussianMixCalculation(AFMImageGaussianMixAnalysis, AFMImage)
Arguments
AFMImageGaussianMixAnalysis |
an |
AFMImage |
an |
Author(s)
M.Beauvais
Examples
## Not run:
library(AFM)
data(AFMImageCollagenNetwork)
AFMImage<-AFMImageCollagenNetwork
AFMImage@fullfilename<-"/Users/one/AFMImageCollagenNetwork.txt"
gMixAnalysis<-AFMImageGaussianMixAnalysis()
# from two components
gMixAnalysis@minGaussianMix<-2
# to four components
gMixAnalysis@maxGaussianMix<-4
# convergence criteria
gMixAnalysis@epsilonGaussianMix<-1e-4
# Create a closure to update progress
gMixAnalysis@updateProgress<- function(value = NULL, detail = NULL, message = NULL) {
if (exists("progressGaussianMix")){
if (!is.null(message)) {
progressGaussianMix$set(message = message, value = 0)
}else{
progressGaussianMix$set(value = value, detail = detail)
}
}
}
gMixAnalysis<-performGaussianMixCalculation(AFMImageGaussianMixAnalysis= gMixAnalysis, AFMImage)
print("done performGaussianMixCalculation")
## End(Not run)
[Package AFM version 2.0 Index]