mirror of
https://github.com/MillironX/beefblup.git
synced 2024-11-10 18:23:08 +00:00
Import and sort data
This commit is contained in:
parent
fe8a4d9a8a
commit
59de539f99
2 changed files with 32 additions and 0 deletions
Binary file not shown.
32
MATLAB/beefblup.m
Normal file
32
MATLAB/beefblup.m
Normal file
|
@ -0,0 +1,32 @@
|
|||
% beefblup
|
||||
% Main script for performing single-variate BLUP to find beef cattle
|
||||
% breeding values
|
||||
% Usage: beefblup
|
||||
% (C) 2018 Thomas A. Christensen II
|
||||
% Licensed under BSD-3-Clause License
|
||||
|
||||
% Prepare the workspace for computation
|
||||
clear
|
||||
clc
|
||||
close all
|
||||
|
||||
% Import data from a suitable spreadsheet
|
||||
[name, path] = uigetfile('*.xlsx','Select a beefblup worksheet');
|
||||
fullname = [path name];
|
||||
clear name path
|
||||
[~, ~, data] = xlsread(fullname);
|
||||
|
||||
% Extract the headers into a separate array
|
||||
headers = data(1,:);
|
||||
data(1,:) = [];
|
||||
|
||||
% Convert the string dates to numbers
|
||||
data(:,2) = num2cell(datenum(data(:,2)));
|
||||
|
||||
% Sort the array by date
|
||||
data = sortrows(data,2);
|
||||
|
||||
% Create a lookup lambda function to find the animal represented by a
|
||||
% certain id
|
||||
ids = data(:,1);
|
||||
animalrow = @(id) find(ids == id);
|
Loading…
Reference in a new issue