Fixed output formatting

This commit is contained in:
Waldir Leoncio 2021-03-30 08:23:37 +02:00
parent 231e0ff501
commit c7720f33b4

View file

@ -75,12 +75,12 @@ greedyMix <- function(
# ASK: remove? # ASK: remove?
# h0 = findobj('Tag','filename1_text'); # h0 = findobj('Tag','filename1_text');
# set(h0,'String',filename); clear h0; # set(h0,'String',filename); clear h0;
cat( message(
'When using data which are in BAPS-format,', 'When using data which are in BAPS-format,',
'you can specify the sampling populations of the', 'you can specify the sampling populations of the',
'individuals by giving two additional files:', 'individuals by giving two additional files:',
'one containing the names of the populations,', 'one containing the names of the populations,',
'the other containing the indices of the first', 'the other containing the indices of the first ',
'individuals of the populations.' 'individuals of the populations.'
) )
input_pops <- inputdlg( input_pops <- inputdlg(