performAllPSDCalculation {AFM}

Perform all the calculation for PSD exploitation

Description

performAllPSDCalculation perform all the calculation for PSD exploitation

Usage

performAllPSDCalculation(AFMImagePSDAnalysis, AFMImage)

Arguments

AFMImagePSDAnalysis

an AFMImagePSDAnalysis to manage and store the results of PSD analysis

AFMImage

an AFMImage from Atomic Force Microscopy

Author(s)

M.Beauvais

Examples

## Not run: 
library(AFM)

data(AFMImageOfNormallyDistributedHeights)

newAFMImage<-AFMImageOfNormallyDistributedHeights
newAFMImage@fullfilename<-"C:/Users/one/AFMImageOfNormallyDistributedHeights.txt"
psdAnalysis<-AFMImagePSDAnalysis()
# Create a closure to update progress
psdAnalysis@updateProgress<- function(value = NULL, detail = NULL, message = NULL) {
  if (exists("progressPSD")){
    if (!is.null(message)) {
      progressPSD$set(message = message, value = 0)
    }else{
      progressPSD$set(value = value, detail = detail)
    }
  }
}
psdAnalysis@psd1d_breaks<-2^3
psdAnalysis@psd2d_truncHighLengthScale<-TRUE
psdAnalysis<-performAllPSDCalculation(AFMImagePSDAnalysis= psdAnalysis, AFMImage= newAFMImage)
print("done psdAnalysis")

## End(Not run)