GraphScannerGUI: calculation(x,y,data,xyScaleMatrix) - File Exchange

Code covered by the BSD License

Highlights from
GraphScannerGUI

addNewPoint(scObj,varargin) ADDNEWPOINT function adds new point(s) to the picture.
calculation(x,y,data,xyScaleM... CALCULATION function performs calculation on point(s) and maps them to
cellSelection(scObj,varargin) CELLSELECTION function highlights point which is selected from the data table.
checkDistance(x_1,y_1,pts,mod... CHECKDISTANCE function checks the approriate distance for the closest
coordinatesOkCancelPress(scOb... COORDINATESOKPRESS function either closes the SetCoordinates figure,
createPointer CREATEPOINTER fucntion creates a shape for the pointer.
curveListFcn(obj,varargin) CURVELISTFCN displays user defined curve which has been picked from the
deletePicture(obj,varargin) DELETEPICTURE function deletes the current picture.
deletePoint(scObj,varargin) DELETEPOINT function deletes user defined point(s) from the picture.
extractpts(handle) EXTRACTPTS Summary of this function goes here
fitting(obj,varargin) FITTING function enables user to fit a curve for a given data.
gridCalculation(data,scale,va... GRIDCALCULATION function calculates necessary data in order to plot a
loadPicture(obj,varargin) LOADPICTURE function loads an image on the GUI panel.
movePoint(scObj,varargin) MOVEPOINT function moves user defined point inside the picture frame.
outOfRange(data,x,y) OUTOFRANGE function checks whether the user has made a selection outside
print(obj,varargin) PRINT function prints current picture.
pushMinusScale(obj,varargin) PUSHMINUSSCALE function scales down the current size of the picture.
pushPlusScale(obj,varargin) PUSHPLUSSCALE function scales up the current size of the picture.
quit(obj,varargin) QUIT function quits the program and before closing the figure checks
resizeFitToScreen(rObj,vararg... RESIZEFITTOSCREENPRESS function resizes the graph to fit entirely into panel
resizeOkCancelPress(rObj,vara... RESIZEOKPRESS function accepts user inputs and closes the Resize figure.
resizeResetPress(rObj,varargi... RESIZERESETPRESS function resets the figure size to original value.
save(obj,varargin) SAVE function saves current data.
saveAs(obj,varargin) SAVEAS fucntion saves the current data to the user given location.
selectPoint(scObj,varargin) SELECTPOINT function selects point from the curve and highlights the
setColor(sObj,varargin) SETCOLOR function defines linecolor and both marker colors
setNewCurve(scObj,varargin) SETNEWCURVE function for defining initial point(s) from the picture.
setPoint(scObj,varargin) SETPOINT1 function captures origin, xlim and ylim points from the picture.
settingOkCancelPress(sObj,var... SETTINGOKPRESS function either accepts settings and closes the figure or
GraphScannerGUI GraphScannerGUI Class for extracting points from a picture.
resize RESIZE Class for resizing current figure on the GUI panel.
setCoordinates SETCOORDINATES Class for defining required data on the given picture.
setCurve SETCURVE Class for defining and modifing points on the given picture.
setting SETTING Class for defining particular setting to the current plot.
GraphScannerGUI.m
View all files

from GraphScannerGUI by Mikko Leppänen
GraphScanner GUI program allows to extract data values from graphs.

calculation(x,y,data,xyScaleMatrix)

function newCoordinates = calculation(x,y,data,xyScaleMatrix)
%CALCULATION function performs calculation on point(s) and maps them to
%correspond the real coordinate values.
    pixelData = data(1:3,3:4);
    realData = data(1:3,1:2);
    xPixelInfo = diff(pixelData(1:2,1));
    yPixelInfo = diff(pixelData(1:2:3,2));
    xRealInfo = diff(realData(1:2,1));
    yRealInfo = diff(realData(1:2:3,2));
    newCoordinates = zeros(size([x,y]));
    newCoordinates(:,1) = (x-pixelData(1,1))*1/xPixelInfo*xRealInfo+realData(1,1);
    newCoordinates(:,2) = (y-pixelData(1,2))*1/yPixelInfo*yRealInfo+realData(1,2);
    newCoordinates(:,1) = str2num(sprintf('%10.6e\n',newCoordinates(:,1)));
    newCoordinates(:,2) = str2num(sprintf('%10.6e\n',newCoordinates(:,2)));
    if xyScaleMatrix(1) == 2
        xLogTick = 10.^(log10(realData(1,1)):log10(realData(2,1)));
        xLogInt = [pixelData(1,1),...
                   log10(2:10)*xPixelInfo/(numel(xLogTick)-1)+pixelData(1,1)]';
        xLogInt = repmat(xLogInt,1,numel(xLogTick)-1)+...
                  xPixelInfo/(numel(xLogTick)-1)*repmat(0:numel(xLogTick)-2,numel(xLogInt),1);
        [m,n] = size(xLogInt);      
        xLogInt = xLogInt(:);
        [row,col] = find(xLogInt(:,:,ones(1,length(x'))) >=...
                    reshape(repmat(x',length(xLogInt(:)),1),[],1,length(x')));
        row = row(diff([0;col]) == 1);
        [r,c] = ind2sub([m,n],row);
        newCoordinates(:,1) = xLogTick(c)'.*(r-1)+(abs(x-xLogInt(row-1)))./...
                              abs((xLogInt(row)-xLogInt(row-1))).*xLogTick(c)';        
        newCoordinates(:,1) = str2num(sprintf('%10.6e\n',newCoordinates(:,1)));
    end
    if xyScaleMatrix(2) == 2
        yLogTick = 10.^(log10(realData(1,2)):log10(realData(3,2)));
        yLogInt = [pixelData(1,2),...
                   log10(2:10)*yPixelInfo/(numel(yLogTick)-1)+pixelData(1,2)]';
        yLogInt = repmat(yLogInt,1,numel(yLogTick)-1)+...
                   yPixelInfo/(numel(yLogTick)-1)*repmat(0:numel(yLogTick)-2,numel(yLogInt),1);
        [m,n] = size(yLogInt);       
        yLogInt = yLogInt(:);
        [row,col] = find(yLogInt(:,:,ones(1,length(y'))) <=...
                    reshape(repmat(y',length(yLogInt(:)),1),[],1,length(y')));
        row = row(diff([0;col]) == 1);
        [r,c] = ind2sub([m,n],row);
        newCoordinates(:,2) = yLogTick(c)'.*(r-1)+(abs(y-yLogInt(row-1)))./...
                              abs((yLogInt(row)-yLogInt(row-1))).*yLogTick(c)';        
        newCoordinates(:,2) = str2num(sprintf('%10.6e\n',newCoordinates(:,2)));
    end  

end

Highlights from GraphScannerGUI

Highlights from
GraphScannerGUI