Fala ai Igor,

testei aqui com kernel 7 e padding 3, ficou bem borrada mas acho que ta
certo pq ainda posso ver "a ideia" da foto. Coloquei em anexo, olha ai e ve
se concorda.

Sent with Mailtrack
<https://mailtrack.io/install?source=signature&lang=en&referral=rapha.ottoni@gmail.com&idSignature=22>

Em 21 de setembro de 2016 14:26, igorcrexito <notifications@github.com>
escreveu:

> Cara, essa daí eu testei. O negócio é que se vc aumenta o tamanho do
> kernel, vc precisa aumentar o padding. O que faz todo sentido, já que as
> camadas convolucionais não promovem redução de dimensionalidade (pelo menos
> não nas arquiteturas da disciplina). Experimenta colocar um kernel 7x7 com
> padding 3, ou um kernel 9x9 com padding 4 (e por aí vai...).
>
> On Wed, Sep 21, 2016 at 2:14 PM, raphaottoni <notifications@github.com>
> wrote:
>
> > Olá Igor,
> >
> > Continua dando segmentation fault aqui tanto no mac como no ubuntu =/
> >
> > —
> > You are receiving this because you authored the thread.
> > Reply to this email directly, view it on GitHub
> > <https://github.com/camilalaranjeira/RPV-VGG19/commit/
> 97f83120d06f1a8c20b30564c1ba2ccdaa0156b1#commitcomment-19117200>,
> > or mute the thread
> > <https://github.com/notifications/unsubscribe-auth/ABCLRF8d5z_
> BSGk0mxE0QQUaqWQC6XyCks5qsWX5gaJpZM4KDDrH>
> > .
> >
>
> —
> You are receiving this because you commented.
> Reply to this email directly, view it on GitHub
> <https://github.com/camilalaranjeira/RPV-VGG19/commit/97f83120d06f1a8c20b30564c1ba2ccdaa0156b1#commitcomment-19117374>,
> or mute the thread
> <https://github.com/notifications/unsubscribe-auth/AEyLgnPsmYC99JCyxUkSmtmiHBW9ShIwks5qsWiygaJpZM4KDDrH>
> .
>

--
Raphael Ottoni S M de Faria


@amitvarma77 Hi, please make sure you are using the latest version of Packer. It uploads the installer to the image based on your VMWare installation.


Не name file, а file name :)


hi to all fix on banshee


Re: _repo_process_pkg_sls

_failed_compile(msg) a good idea to save on repeated code.

L717 Does not look correct, should not contain short_path_name, as you added for the log.error

L734 the same  looks like errors array has not been set a shorter message without short_path_name


Those are QuantLib types. I*Estimator interfaces are designed to give user QL extention points once user started working with QL option pricing models. Types are used and live in QLOptionPriceModel class. Those types are not supposed to leak into the LEAN.


what is this used for?


delete this line


TeamCity libpalaso :: palaso-win32-master Continuous [Build 3.0.776.515b583dc945fad4d0f39bba01f7d2f36c7885cc](http://build.palaso.org/viewLog.html?buildId=77019&buildTypeId=bt223) outcome was **SUCCESS**
Summary: Tests passed: 3490, ignored: 126 Build time: 00:04:25


EMS (brianlball) - x86_64-MacOS-10.10-clang: OK (2308 of 2480 tests passed, 0 test warnings)

![Build Badge](http://img.shields.io/badge/build%20status-warnings-yellow.svg) ![Test Badge](http://img.shields.io/badge/tests%20passed-93.06%25-yellow.svg)


@jhunkeler can you explain a little more?  We don't actually have an stsci-hst package, though I see a spec for one in astroconda which depends itself on stsci.tools. Are you packaging stsci.tools inside stsci-hst but still calling it stsci.tools?


TeamCity libpalaso :: palaso-trusty64-lfmerge Continuous [Build 2.6.74.515b583dc945fad4d0f39bba01f7d2f36c7885cc](http://build.palaso.org/viewLog.html?buildId=77021&buildTypeId=PalasoPrecise64lfmergeContinuous) outcome was **FAILURE**
Summary: Tests failed: 4, passed: 3466, ignored: 107 Build time: 00:05:16
### Failed tests
```
SIL.Core.Tests.dll: SIL.Tests.IO.FileLock.SimpleFileLockTests.ReleaseLock_LockedByActiveProcess_LockFileExists: <no details avaliable>

SIL.Core.Tests.dll: SIL.Tests.IO.FileLock.SimpleFileLockTests.TryAcquireLock_LockedByActiveProcess_ReturnsFalse: <no details avaliable>

SIL.Core.Tests.dll: SIL.Tests.IO.FileLock.SimpleFileLockTests.TryAcquireLock_LockedByActiveProcessNotTimedOut_ReturnsFalse: <no details avaliable>

SIL.Core.Tests.dll: SIL.Tests.IO.FileLock.SimpleFileLockTests.TryAcquireLock_LockedByActiveProcessTimedOut_ReturnsTrue: <no details avaliable>

```


TeamCity libpalaso :: palaso-precise64-libpalaso-2.6 Continuous [Build 2.6.1101.515b583dc945fad4d0f39bba01f7d2f36c7885cc](http://build.palaso.org/viewLog.html?buildId=77018&buildTypeId=PalasoPrecise64v26Cont) outcome was **SUCCESS**
Summary: Tests passed: 3470, ignored: 107 Build time: 00:06:38


grazie @AlessioCoser


I'm sorry that this update caused problems on your side. Unfortunately there aren't any tests guarding against this (and my manual checks for a few modes worked just fine, I just didn't check `haskell-mode` more than opening a file etc.).

As a quick-fix you can install your emacs from a git clone of nixpkgs prior this commit (or with this commit reverted).

Is this an issue with our packaging of `emacs25` or is this an upstream issue of `haskell-mode`?

We could bring back `emacs24` for the time being, but I fear that this will ultimately lead to nixpkgs supporting every past software release ever. *If* we bring it back, then please as a non-default and without duplicating all the `emacs25Packages` stuff in `all-packages.nix`. Just add `pkgs.emacs24` and let users use `packageOverrides` for it.


Пояснения и замечания:
- Для управления правами в блоге теперь вместо ролей существуют 4 категории разрешений: блог, голоса, топики, комментарии. Каждая из категорий, в свою очередь, состоит из 4 разрешений: CREATE, READ, UPDATE, DELETE. Это означает, что можно разрешать или запрещать, например, оставлять комментарии в блоге.
- На комментарии данная система ещё не действует, поскольку не решён вопрос с редактированием.
- Право голоса относится ко всему в блоге: к самому блогу, к его топикам и к комментариям в них.
- Нельзя отобрать право голоса в блоге, если он открытый (потому что пользователь может голосовать даже не состоя в таком блоге).
- Для голосов редактируемым следует оставить только разрешение CREATE, а для других разрешений на голоса следует не добавлять никакого интерфейса.
- Для управления вышеперечисленными правами нужно ещё изготовить UI. Прежний UI для управления ролями всё ещё работает (система обратно совместима со старыми ролями).


develop (nmerket) - x86_64-MacOS-10.9-clang: OK (1764 of 1764 tests passed, 0 test warnings)

![Build Badge](http://img.shields.io/badge/build%20status-passing-green.svg) ![Test Badge](http://img.shields.io/badge/tests%20passed-100.0%25-green.svg)


Commit with a little modification


Reviewed with Vic. Works on computer.


Note that this breaks `deserialize` which will need to be addressed at some point...


Yes, sorry. Fixed.


:clap: :clap: :clap:


`print_log(name, 'POST', '/configurationkeys', 'Create new configurationkey', result)` should be
`print_log(name, 'POST', '/applications/{id}/configurationkeys', 'Create new configurationkey', result)`.
or
`print_log(name, 'POST', '/applications/'+str(id)+'/configurationkeys', 'Create new configurationkey', result)`


Going back to stone age?
Atleast use Os man :/
Ofast sucks!


Excluindo umas imagens que coloquei a mais.


TeamCity libpalaso :: palaso-precise64-master Continuous [Build 3.0.770.515b583dc945fad4d0f39bba01f7d2f36c7885cc](http://build.palaso.org/viewLog.html?buildId=77020&buildTypeId=bt322) outcome was **SUCCESS**
Summary: Tests passed: 3470, ignored: 107 Build time: 00:05:58


Great review! :+1:


Hey Jim,

If you show this, mention the dangers of eval on untrusted imports to newbies. Doesn't matter much here, if a user already has command line to execute circle2, they can do bad things directly. But imagine if this were a web app...

And though eval won't execute an import, exec will, and eval will run exec. Consider:

circle2.py 0 0 "exec('import os; print(os.listdir())')"

This crashes the script, but not until after the os.listdir has run. Substitute evil of your choice. :-)


I think it's better if you use the comment "On windows the path /foo is parsed as BadFormat and checking
 if this is relative or absolute doesn't make sense." as a string that you pass to Assert.Ignore() method.


colors.js a disparut pentru ca am dat eu un revert aiurea :)) am schimbat cateva chestii de acolo doar ca sa imi readuc aminte de cateva chestii invatate mai demult, o sa revin la cerintele initiale


This project is composed of two modules
1. chms which  mimics a church manager, (membership directories and profiles, cell groups, zones and church ministries management, etc)
2. HMS is a hostel manager where guests or students can book in and all transaction will be held online and reports can be generated anytime by the administrators of the system


EMS (brianlball) - i386-Windows-7-VisualStudio-12: Tests Failed (2202 of 2480 tests passed, 0 test warnings)

![Build Badge](http://img.shields.io/badge/build%20status-warnings-yellow.svg) ![Test Badge](http://img.shields.io/badge/tests%20passed-88.79%25-red.svg)


Re: get_repo_data

This needs to be restored
```
# we only call refresh_db if it does not exist, as we want to return
# the existing data even if its old, other parts of the code call this,
# and  they will call refresh if they need too.
if repo_age_sec == -1:
    # no repo meta db
    log.debug('No metadata repo cache file. Refresh meatadata db now.')
    _refresh_db_conditional(saltenv=saltenv)
```
And always run  `_refresh_db_conditional(saltenv=saltenv)` needs to be removed

It would also result in _refresh_db_conditional being called multiple times.   The only reason _refresh_db_conditional is called is to create the metadata db if it does not exist, as it was a recent policy change to create it instead of giving an error back to the use.

And if you run an install and want to find out why it did not work by looking what is defined on the remote server, you want to see the existing metadata db not the data  that as just been updated.


If we add new types to FlatBuffers, other languages need to at least not blow up if they come across them. In theory, we should then eventually support whatever functionality you're trying to add to these other languages too.

Like I've said before, this is very special purpose functionality, and I would not want to modify the core of FlatBuffers for it in a significant way. It be better if this can be done externally to FlatBuffers.


Code was also cleaned of dead code


[R/ABC_SMC.R:3:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L3) *style:* **Variable and function names should be all lowercase.**
```r
getRandomVals <- function(max_val)  {
^~~~~~~~~~~~~
```
[R/ABC_SMC.R:16:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L16) *style:* **Variable and function names should be all lowercase.**
```r
getFromPrevious <- function(inds, ws, disps, filts, comps)  {
^~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:23:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L23) *style:* **Variable and function names should be all lowercase.**
```r
calculateWeight <- function(params, target, sigma,
^~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:26:68:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L26) *style:* **Commas should always have a space after.**
```r
  diff <- params[target] - cbind(disp_vals, filt_vals, comp_vals)[,target]
                                                                   ^
```
[R/ABC_SMC.R:27:54:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L27) *style:* **Trailing whitespace is superfluous.**
```r
  vals <- weights * dnorm(diff, mean = 0, sd = sigma)
                                                     ^~
```
[R/ABC_SMC.R:28:12:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L28) *style:* **Put spaces around all infix operators.**
```r
  return( 1/sum(vals) )
          ~^~
```
[R/ABC_SMC.R:32:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L32) *style:* **Variable and function names should be all lowercase.**
```r
normalizeWeights <- function(x) {
^~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:66:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L66) *style:* **Variable and function names should be all lowercase.**
```r
calculateDistance <- function(rich, even, div, opt_diff, obs, sd_vals)  {
^~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:70:40:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L70) *style:* **Put spaces around all infix operators.**
```r
  fit_optima <- (opt_diff / sd_vals[4])^2
                                      ~^~
```
[R/ABC_SMC.R:78:21:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L78) *style:* **Variable and function names should be all lowercase.**
```r
ABC_SMC <- function(numParticles, species_fallout, taxa, esppres, n_traits,
                    ^~~~~~~~~~~~
```
[R/ABC_SMC.R:80:46:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L80) *style:* **Variable and function names should be all lowercase.**
```r
                    abundances, frequencies, stopRate, Ord,
                                             ^~~~~~~~
```
[R/ABC_SMC.R:80:60:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L80) *style:* **Trailing whitespace is superfluous.**
```r
                    abundances, frequencies, stopRate, Ord,
                                                           ^
```
[R/ABC_SMC.R:86:52:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L86) *style:* **Trailing whitespace is superfluous.**
```r
           "one of the community summary statistics
                                                   ^
```
[R/ABC_SMC.R:90:10:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L90) *style:* **Variable and function names should be all lowercase.**
```r
  res <- detMnbsp(Ord, abundances)
         ^~~~~~~~
```
[R/ABC_SMC.R:90:10:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L90) *warning:* **no visible global function definition for ‘detMnbsp’**
```r
  res <- detMnbsp(Ord, abundances)
         ^~~~~~~~
```
[R/ABC_SMC.R:93:18:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L93) *style:* **Variable and function names should be all lowercase.**
```r
  disp_vals <- 1:numParticles
                 ^~~~~~~~~~~~
```
[R/ABC_SMC.R:94:18:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L94) *style:* **Variable and function names should be all lowercase.**
```r
  filt_vals <- 1:numParticles
                 ^~~~~~~~~~~~
```
[R/ABC_SMC.R:95:18:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L95) *style:* **Variable and function names should be all lowercase.**
```r
  comp_vals <- 1:numParticles
                 ^~~~~~~~~~~~
```
[R/ABC_SMC.R:97:13:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L97) *style:* **Variable and function names should be all lowercase.**
```r
  fits <- 1:numParticles
            ^~~~~~~~~~~~
```
[R/ABC_SMC.R:98:17:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L98) *style:* **Variable and function names should be all lowercase.**
```r
  rich_vec <- 1:numParticles
                ^~~~~~~~~~~~
```
[R/ABC_SMC.R:99:16:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L99) *style:* **Variable and function names should be all lowercase.**
```r
  eve_vec <- 1:numParticles
               ^~~~~~~~~~~~
```
[R/ABC_SMC.R:100:16:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L100) *style:* **Variable and function names should be all lowercase.**
```r
  div_vec <- 1:numParticles
               ^~~~~~~~~~~~
```
[R/ABC_SMC.R:101:16:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L101) *style:* **Variable and function names should be all lowercase.**
```r
  opt_vec <- 1:numParticles
               ^~~~~~~~~~~~
```
[R/ABC_SMC.R:107:21:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L107) *style:* **Variable and function names should be all lowercase.**
```r
  weights <- rep(1, numParticles)
                    ^~~~~~~~~~~~
```
[R/ABC_SMC.R:108:26:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L108) *style:* **Variable and function names should be all lowercase.**
```r
  next_weights <- rep(1, numParticles)
                         ^~~~~~~~~~~~
```
[R/ABC_SMC.R:109:16:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L109) *style:* **Variable and function names should be all lowercase.**
```r
  indices <- 1:numParticles
               ^~~~~~~~~~~~
```
[R/ABC_SMC.R:121:7:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L121) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    if(d[numParticles,1] == numParticles) {
      ^
```
[R/ABC_SMC.R:121:10:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L121) *style:* **Variable and function names should be all lowercase.**
```r
    if(d[numParticles,1] == numParticles) {
         ^~~~~~~~~~~~
```
[R/ABC_SMC.R:121:23:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L121) *style:* **Commas should always have a space after.**
```r
    if(d[numParticles,1] == numParticles) {
                      ^
```
[R/ABC_SMC.R:121:29:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L121) *style:* **Variable and function names should be all lowercase.**
```r
    if(d[numParticles,1] == numParticles) {
                            ^~~~~~~~~~~~
```
[R/ABC_SMC.R:143:5:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L143) *style:* **Variable and function names should be all lowercase.**
```r
    numberAccepted <- 0
    ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:144:28:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L144) *style:* **Variable and function names should be all lowercase.**
```r
    if (t != 1) weights <- normalizeWeights(weights)
                           ^~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:144:28:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L144) *warning:* **no visible global function definition for ‘normalizeWeights’**
```r
    if (t != 1) weights <- normalizeWeights(weights)
                           ^~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:152:12:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L152) *style:* **Variable and function names should be all lowercase.**
```r
    while (numberAccepted <= numParticles) {
           ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:152:30:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L152) *style:* **Variable and function names should be all lowercase.**
```r
    while (numberAccepted <= numParticles) {
                             ^~~~~~~~~~~~
```
[R/ABC_SMC.R:156:19:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L156) *style:* **Variable and function names should be all lowercase.**
```r
        params <- getRandomVals(species_fallout)
                  ^~~~~~~~~~~~~
```
[R/ABC_SMC.R:156:19:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L156) *warning:* **no visible global function definition for ‘getRandomVals’**
```r
        params <- getRandomVals(species_fallout)
                  ^~~~~~~~~~~~~
```
[R/ABC_SMC.R:158:19:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L158) *style:* **Variable and function names should be all lowercase.**
```r
        params <- getFromPrevious(indices, weights,
                  ^~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:160:19:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L160) *warning:* **no visible global function definition for ‘perturb’**
```r
        params <- perturb(params, sigma)
                  ^~~~~~~
```
[R/ABC_SMC.R:170:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L170) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~
```
[R/ABC_SMC.R:174:40:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L174) *style:* **Commas should always have a space after.**
```r
      traits <- as.data.frame(species[,c(2:(n_traits+1))],
                                       ^
```
[R/ABC_SMC.R:174:53:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L174) *style:* **Put spaces around all infix operators.**
```r
      traits <- as.data.frame(species[,c(2:(n_traits+1))],
                                                   ~^~
```
[R/ABC_SMC.R:175:40:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L175) *style:* **Put spaces around all infix operators.**
```r
                              row.names=c(1:taxa))
                                      ~^~
```
[R/ABC_SMC.R:179:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L179) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~
```
[R/ABC_SMC.R:180:20:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L180) *style:* **Variable and function names should be all lowercase.**
```r
      FD_output <- strippedDbFd(Ord, communities,
                   ^~~~~~~~~~~~
```
[R/ABC_SMC.R:180:50:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L180) *style:* **Trailing whitespace is superfluous.**
```r
      FD_output <- strippedDbFd(Ord, communities,
                                                 ^
```
[R/ABC_SMC.R:181:64:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L181) *style:* **Trailing whitespace is superfluous.**
```r
                                m = res[[1]], nb.sp = res[[2]])
                                                               ^
```
[R/ABC_SMC.R:182:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L182) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/ABC_SMC.R:184:29:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L184) *style:* **Trailing whitespace is superfluous.**
```r
      FRic <- FD_output$FRic
                            ^
```
[R/ABC_SMC.R:186:29:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L186) *style:* **Trailing whitespace is superfluous.**
```r
      FEve <- FD_output$FEve
                            ^
```
[R/ABC_SMC.R:188:29:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L188) *style:* **Trailing whitespace is superfluous.**
```r
      FDiv <- FD_output$FDiv
                            ^
```
[R/ABC_SMC.R:197:69:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L197) *style:* **Trailing whitespace is superfluous.**
```r
      # calculate distance of trait mean between simulated community
                                                                    ^
```
[R/ABC_SMC.R:201:72:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L201) *style:* **Trailing whitespace is superfluous.**
```r
      # (inverse) fit of model: euclidian distance of FD and trait mean
                                                                       ^
```
[R/ABC_SMC.R:203:14:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L203) *style:* **Variable and function names should be all lowercase.**
```r
      fit <- calculateDistance(FRic[[1]], FEve[[1]], FDiv[[1]],
             ^~~~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:205:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L205) *style:* **Trailing whitespace is superfluous.**
```r

^~~~~~
```
[R/ABC_SMC.R:208:19:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L208) *style:* **Variable and function names should be all lowercase.**
```r
        next_disp[numberAccepted] <- params[1]
                  ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:209:19:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L209) *style:* **Variable and function names should be all lowercase.**
```r
        next_filt[numberAccepted] <- params[2]
                  ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:210:19:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L210) *style:* **Variable and function names should be all lowercase.**
```r
        next_comp[numberAccepted] <- params[3]
                  ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:212:14:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L212) *style:* **Variable and function names should be all lowercase.**
```r
        fits[numberAccepted] <- fit
             ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:213:18:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L213) *style:* **Variable and function names should be all lowercase.**
```r
        rich_vec[numberAccepted] <- FRic[[1]]
                 ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:214:17:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L214) *style:* **Variable and function names should be all lowercase.**
```r
        eve_vec[numberAccepted] <- FEve[[1]]
                ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:215:17:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L215) *style:* **Variable and function names should be all lowercase.**
```r
        div_vec[numberAccepted] <- FDiv[[1]]
                ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:216:17:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L216) *style:* **Variable and function names should be all lowercase.**
```r
        opt_vec[numberAccepted] <- mean_optimum
                ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:219:24:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L219) *style:* **Variable and function names should be all lowercase.**
```r
          next_weights[numberAccepted] <- 1
                       ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:221:24:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L221) *style:* **Variable and function names should be all lowercase.**
```r
          next_weights[numberAccepted] <-
                       ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:222:13:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L222) *style:* **Variable and function names should be all lowercase.**
```r
            calculateWeight(params, changed, sigma, disp_vals, filt_vals,
            ^~~~~~~~~~~~~~~
```
[R/ABC_SMC.R:225:9:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L225) *style:* **Variable and function names should be all lowercase.**
```r
        numberAccepted <- numberAccepted + 1
        ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:225:27:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L225) *style:* **Variable and function names should be all lowercase.**
```r
        numberAccepted <- numberAccepted + 1
                          ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:226:13:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L226) *style:* **Place a space before left parenthesis, except in a function call.**
```r
        if ((numberAccepted) %% (numParticles / PRINT_FREQ) == 0) {
            ^
```
[R/ABC_SMC.R:226:14:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L226) *style:* **Variable and function names should be all lowercase.**
```r
        if ((numberAccepted) %% (numParticles / PRINT_FREQ) == 0) {
             ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:226:34:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L226) *style:* **Variable and function names should be all lowercase.**
```r
        if ((numberAccepted) %% (numParticles / PRINT_FREQ) == 0) {
                                 ^~~~~~~~~~~~
```
[R/ABC_SMC.R:233:21:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L233) *style:* **Put spaces around all infix operators.**
```r
      if (tried > (1/stopRate) && tried > 50)  {
                   ~^~
```
[R/ABC_SMC.R:233:22:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L233) *style:* **Variable and function names should be all lowercase.**
```r
      if (tried > (1/stopRate) && tried > 50)  {
                     ^~~~~~~~
```
[R/ABC_SMC.R:235:13:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L235) *style:* **Variable and function names should be all lowercase.**
```r
        if (numberAccepted / tried < stopRate) {
            ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:235:38:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L235) *style:* **Variable and function names should be all lowercase.**
```r
        if (numberAccepted / tried < stopRate) {
                                     ^~~~~~~~
```
[R/ABC_SMC.R:255:54:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L255) *style:* **Put spaces around all infix operators.**
```r
    file_name <- paste("particles_t=", t, ".txt", sep="", collapse = NULL)
                                                    ~^~
```
[R/ABC_SMC.R:258:64:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L258) *style:* **Trailing whitespace is superfluous.**
```r
    cat(" ", mean(disp_vals), mean(filt_vals), mean(comp_vals),
                                                               ^
```
[R/ABC_SMC.R:259:33:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L259) *style:* **Variable and function names should be all lowercase.**
```r
        "\t", "accept rate = ", numberAccepted / (tried-1), "\n")
                                ^~~~~~~~~~~~~~
```
[R/ABC_SMC.R:259:56:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L259) *style:* **Put spaces around all infix operators.**
```r
        "\t", "accept rate = ", numberAccepted / (tried-1), "\n")
                                                      ~^~
```
[R/ABC_SMC.R:262:27:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L262) *style:* **Commas should always have a space after.**
```r
    next_weights <- rep(1,numParticles)
                          ^
```
[R/ABC_SMC.R:262:27:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L262) *style:* **Variable and function names should be all lowercase.**
```r
    next_weights <- rep(1,numParticles)
                          ^~~~~~~~~~~~
```
[R/ABC_SMC.R:263:20:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L263) *style:* **Variable and function names should be all lowercase.**
```r
    next_disp <- 1:numParticles
                   ^~~~~~~~~~~~
```
[R/ABC_SMC.R:264:20:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L264) *style:* **Variable and function names should be all lowercase.**
```r
    next_filt <- 1:numParticles
                   ^~~~~~~~~~~~
```
[R/ABC_SMC.R:265:20:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L265) *style:* **Variable and function names should be all lowercase.**
```r
    next_comp <- 1:numParticles
                   ^~~~~~~~~~~~
```
[R/ABC_SMC.R:275:61:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L275) *style:* **Put spaces around all infix operators.**
```r
    d <- read.table(paste("particles_t=", t - 1, ".txt", sep="",
                                                           ~^~
```
[R/ABC_SMC.R:279:40:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L279) *style:* **Trailing whitespace is superfluous.**
```r
           "Can't stop at iteration 1 -
                                       ^
```
[R/ABC_SMC.R:280:57:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/ABC_SMC.R#L280) *style:* **Trailing whitespace is superfluous.**
```r
           please set stop_at_iteration to 2 if you only
                                                        ^
```
[R/generateArtificialData.R:5:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L5) *style:* **Words within variable and function names should be separated by '_' rather than '.'.**
```r
generate.Artificial.Data <- function(n_species, n_traits, n_communities,
^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/generateArtificialData.R:6:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L6) *style:* **Use two spaces to indent, never tabs.**
```r
	pool_richness <- n_species
^
```
[R/generateArtificialData.R:8:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L8) *style:* **Use two spaces to indent, never tabs.**
```r
	traits_pool <- matrix( round( rnorm(n = (pool_richness * n_traits),
^
```
[R/generateArtificialData.R:9:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L9) *style:* **Use two spaces to indent, never tabs.**
```r
	                                    mean = 0, sd = 1), 3),
^
```
[R/generateArtificialData.R:10:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L10) *style:* **Use two spaces to indent, never tabs.**
```r
	                       ncol = n_traits, nrow = pool_richness)
^
```
[R/generateArtificialData.R:10:23:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L10) *style:* **Put spaces around all infix operators.**
```r
	pool_richness <- n_species
                     ~^~~
```
[R/generateArtificialData.R:12:21:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L12) *style:* **Put spaces around all infix operators.**
```r
	traits_pool <- matrix( round( rnorm(n = (pool_richness * n_traits),
                   ~^~~
```
[R/generateArtificialData.R:12:47:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L12) *style:* **Put spaces around all infix operators.**
```r
	traits_pool <- matrix( round( rnorm(n = (pool_richness * n_traits),
                                             ~^~
```
[R/generateArtificialData.R:12:49:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L12) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	traits_pool <- matrix( round( rnorm(n = (pool_richness * n_traits),
                                                ^
```
[R/generateArtificialData.R:12:64:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L12) *style:* **Put spaces around all infix operators.**
```r
	traits_pool <- matrix( round( rnorm(n = (pool_richness * n_traits),
                                                              ~^~
```
[R/generateArtificialData.R:13:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L13) *style:* **Use two spaces to indent, never tabs.**
```r
	for(i in 1:pool_richness) {
^
```
[R/generateArtificialData.R:13:50:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L13) *style:* **Put spaces around all infix operators.**
```r
	                                    mean = 0, sd = 1), 3),
                                                ~^~
```
[R/generateArtificialData.R:13:58:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L13) *style:* **Put spaces around all infix operators.**
```r
	                                    mean = 0, sd = 1), 3),
                                                        ~^~
```
[R/generateArtificialData.R:14:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L14) *style:* **Use two spaces to indent, never tabs.**
```r
	  column1[i] <- paste("species", i, sep = "")
^
```
[R/generateArtificialData.R:14:37:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L14) *style:* **Put spaces around all infix operators.**
```r
	                       ncol = n_traits, nrow = pool_richness)
                                   ~^~
```
[R/generateArtificialData.R:14:54:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L14) *style:* **Put spaces around all infix operators.**
```r
	                       ncol = n_traits, nrow = pool_richness)
                                                    ~^~
```
[R/generateArtificialData.R:15:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L15) *style:* **Use two spaces to indent, never tabs.**
```r
	}
^
```
[R/generateArtificialData.R:16:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L16) *style:* **Use two spaces to indent, never tabs.**
```r
	row1 <- rep(NA, (n_traits + 1))
^
```
[R/generateArtificialData.R:17:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L17) *style:* **Use two spaces to indent, never tabs.**
```r
	for(i in 1:n_traits + 1) {
^
```
[R/generateArtificialData.R:17:12:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L17) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	for(i in 1:pool_richness) {
           ^
```
[R/generateArtificialData.R:18:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L18) *style:* **Use two spaces to indent, never tabs.**
```r
	  row1[i] <- paste("trait", (i - 1), sep="")
^
```
[R/generateArtificialData.R:18:22:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L18) *style:* **Put spaces around all infix operators.**
```r
	  column1[i] <- paste("species", i, sep = "")
                    ~^~~
```
[R/generateArtificialData.R:19:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L19) *style:* **Use two spaces to indent, never tabs.**
```r
	}
^
```
[R/generateArtificialData.R:20:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L20) *style:* **Use two spaces to indent, never tabs.**
```r
	row1[1] <- "species"
^
```
[R/generateArtificialData.R:20:14:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L20) *style:* **Put spaces around all infix operators.**
```r
	row1 <- rep(NA, (n_traits + 1))
            ~^~~
```
[R/generateArtificialData.R:20:25:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L20) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	row1 <- rep(NA, (n_traits + 1))
                        ^
```
[R/generateArtificialData.R:21:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L21) *style:* **Use two spaces to indent, never tabs.**
```r
	columns <- matrix( cbind( column1, traits_pool), ncol = (n_traits + 1))
^
```
[R/generateArtificialData.R:21:12:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L21) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	for(i in 1:n_traits + 1) {
           ^
```
[R/generateArtificialData.R:22:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L22) *style:* **Use two spaces to indent, never tabs.**
```r
	traits_pool_df <- as.data.frame(columns)
^
```
[R/generateArtificialData.R:22:19:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L22) *style:* **Put spaces around all infix operators.**
```r
	  row1[i] <- paste("trait", (i - 1), sep="")
                 ~^~~
```
[R/generateArtificialData.R:22:37:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L22) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	  row1[i] <- paste("trait", (i - 1), sep="")
                                    ^
```
[R/generateArtificialData.R:22:40:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L22) *style:* **Put spaces around all infix operators.**
```r
	  row1[i] <- paste("trait", (i - 1), sep="")
                                      ~^~
```
[R/generateArtificialData.R:23:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L23) *style:* **Use two spaces to indent, never tabs.**
```r
	names(traits_pool_df) <- row1
^
```
[R/generateArtificialData.R:24:17:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L24) *style:* **Put spaces around all infix operators.**
```r
	row1[1] <- "species"
               ~^~~
```
[R/generateArtificialData.R:25:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L25) *style:* **Use two spaces to indent, never tabs.**
```r
	comm_spec_matrix <- matrix(rep(0, (n_communities * pool_richness)),
^
```
[R/generateArtificialData.R:25:17:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L25) *style:* **Put spaces around all infix operators.**
```r
	columns <- matrix( cbind( column1, traits_pool), ncol = (n_traits + 1))
               ~^~~
```
[R/generateArtificialData.R:25:63:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L25) *style:* **Put spaces around all infix operators.**
```r
	columns <- matrix( cbind( column1, traits_pool), ncol = (n_traits + 1))
                                                             ~^~
```
[R/generateArtificialData.R:25:65:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L25) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	columns <- matrix( cbind( column1, traits_pool), ncol = (n_traits + 1))
                                                                ^
```
[R/generateArtificialData.R:26:24:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L26) *style:* **Put spaces around all infix operators.**
```r
	traits_pool_df <- as.data.frame(columns)
                      ~^~~
```
[R/generateArtificialData.R:27:31:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L27) *style:* **Put spaces around all infix operators.**
```r
	names(traits_pool_df) <- row1
                             ~^~~
```
[R/generateArtificialData.R:28:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L28) *style:* **Use two spaces to indent, never tabs.**
```r
	occurence <- 10 ^ rnorm(pool_richness, mean = 0, sd = occurence_distribution)
^
```
[R/generateArtificialData.R:29:26:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L29) *style:* **Put spaces around all infix operators.**
```r
	comm_spec_matrix <- matrix(rep(0, (n_communities * pool_richness)),
                        ~^~~
```
[R/generateArtificialData.R:29:43:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L29) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	comm_spec_matrix <- matrix(rep(0, (n_communities * pool_richness)),
                                          ^
```
[R/generateArtificialData.R:29:58:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L29) *style:* **Put spaces around all infix operators.**
```r
	comm_spec_matrix <- matrix(rep(0, (n_communities * pool_richness)),
                                                        ~^~
```
[R/generateArtificialData.R:30:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L30) *style:* **Use two spaces to indent, never tabs.**
```r
	richness_values <- round((rnorm(n_communities, mean = 0, sd = 1) *
^
```
[R/generateArtificialData.R:31:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L31) *style:* **Use two spaces to indent, never tabs.**
```r
	                            (sd_richness * pool_richness) +
^
```
[R/generateArtificialData.R:32:19:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L32) *style:* **Put spaces around all infix operators.**
```r
	occurence <- 10 ^ rnorm(pool_richness, mean = 0, sd = occurence_distribution)
                 ~^~~
```
[R/generateArtificialData.R:32:25:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L32) *style:* **Put spaces around all infix operators.**
```r
	occurence <- 10 ^ rnorm(pool_richness, mean = 0, sd = occurence_distribution)
                       ~^~
```
[R/generateArtificialData.R:32:53:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L32) *style:* **Put spaces around all infix operators.**
```r
	occurence <- 10 ^ rnorm(pool_richness, mean = 0, sd = occurence_distribution)
                                                   ~^~
```
[R/generateArtificialData.R:32:61:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L32) *style:* **Put spaces around all infix operators.**
```r
	occurence <- 10 ^ rnorm(pool_richness, mean = 0, sd = occurence_distribution)
                                                           ~^~
```
[R/generateArtificialData.R:33:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L33) *style:* **Use two spaces to indent, never tabs.**
```r
	richness_values[which(richness_values > pool_richness)] <- pool_richness
^
```
[R/generateArtificialData.R:34:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L34) *style:* **Use two spaces to indent, never tabs.**
```r
	richness_values[which(richness_values < 0)] <- 0
^
```
[R/generateArtificialData.R:34:25:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L34) *style:* **Put spaces around all infix operators.**
```r
	richness_values <- round((rnorm(n_communities, mean = 0, sd = 1) *
                       ~^~~
```
[R/generateArtificialData.R:34:34:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L34) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	richness_values <- round((rnorm(n_communities, mean = 0, sd = 1) *
                                 ^
```
[R/generateArtificialData.R:34:61:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L34) *style:* **Put spaces around all infix operators.**
```r
	richness_values <- round((rnorm(n_communities, mean = 0, sd = 1) *
                                                           ~^~
```
[R/generateArtificialData.R:34:68:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L34) *style:* **Trailing whitespace is superfluous.**
```r
	richness_values <- round((rnorm(n_communities, mean = 0, sd = 1) *
                                                                   ^
```
[R/generateArtificialData.R:35:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L35) *style:* **Use two spaces to indent, never tabs.**
```r
	for(i in 1:n_communities) {
^
```
[R/generateArtificialData.R:35:37:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L35) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	                            (sd_richness * pool_richness) +
                                    ^
```
[R/generateArtificialData.R:35:50:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L35) *style:* **Put spaces around all infix operators.**
```r
	                            (sd_richness * pool_richness) +
                                                ~^~
```
[R/generateArtificialData.R:36:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L36) *style:* **Use two spaces to indent, never tabs.**
```r
	  if(mechanism_random == TRUE){
^
```
[R/generateArtificialData.R:37:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L37) *style:* **Use two spaces to indent, never tabs.**
```r
	    present_species <- sample(c(1:pool_richness), richness_values[i],
^
```
[R/generateArtificialData.R:37:47:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L37) *style:* **Put spaces around all infix operators.**
```r
	richness_values[which(richness_values > pool_richness)] <- pool_richness
                                             ~^~
```
[R/generateArtificialData.R:37:65:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L37) *style:* **Put spaces around all infix operators.**
```r
	richness_values[which(richness_values > pool_richness)] <- pool_richness
                                                               ~^~~
```
[R/generateArtificialData.R:38:47:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L38) *style:* **Put spaces around all infix operators.**
```r
	richness_values[which(richness_values < 0)] <- 0
                                             ~^
```
[R/generateArtificialData.R:39:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L39) *style:* **Use two spaces to indent, never tabs.**
```r
	  } else {
^
```
[R/generateArtificialData.R:39:12:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L39) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	for(i in 1:n_communities) {
           ^
```
[R/generateArtificialData.R:40:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L40) *style:* **Use two spaces to indent, never tabs.**
```r
	    opt_traits <- rnorm(n_traits, mean = 0, sd = 1)
^
```
[R/generateArtificialData.R:40:13:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L40) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	  if(mechanism_random == TRUE){
            ^
```
[R/generateArtificialData.R:40:31:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L40) *style:* **Put spaces around all infix operators.**
```r
	  if(mechanism_random == TRUE){
                             ~^~~
```
[R/generateArtificialData.R:41:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L41) *style:* **Use two spaces to indent, never tabs.**
```r
	    opt_traits_matrix <- c()
^
```
[R/generateArtificialData.R:41:29:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L41) *style:* **Put spaces around all infix operators.**
```r
	    present_species <- sample(c(1:pool_richness), richness_values[i],
                           ~^~~
```
[R/generateArtificialData.R:42:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L42) *style:* **Use two spaces to indent, never tabs.**
```r
	    for (j in 1:n_traits) {
^
```
[R/generateArtificialData.R:43:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L43) *style:* **Use two spaces to indent, never tabs.**
```r
	      for (k in 1:pool_richness) {
^
```
[R/generateArtificialData.R:44:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L44) *style:* **Use two spaces to indent, never tabs.**
```r
		      l <- (j - 1) * pool_richness + k
^~
```
[R/generateArtificialData.R:44:24:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L44) *style:* **Put spaces around all infix operators.**
```r
	    opt_traits <- rnorm(n_traits, mean = 0, sd = 1)
                      ~^~~
```
[R/generateArtificialData.R:44:48:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L44) *style:* **Put spaces around all infix operators.**
```r
	    opt_traits <- rnorm(n_traits, mean = 0, sd = 1)
                                              ~^~
```
[R/generateArtificialData.R:45:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L45) *style:* **Use two spaces to indent, never tabs.**
```r
		      opt_traits_matrix[l] <- opt_traits[j]
^~
```
[R/generateArtificialData.R:46:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L46) *style:* **Use two spaces to indent, never tabs.**
```r
	      }
^
```
[R/generateArtificialData.R:46:17:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L46) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	    for (j in 1:n_traits) {
                ^
```
[R/generateArtificialData.R:47:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L47) *style:* **Use two spaces to indent, never tabs.**
```r
	    }
^
```
[R/generateArtificialData.R:47:19:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L47) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	      for (k in 1:pool_richness) {
                  ^
```
[R/generateArtificialData.R:48:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L48) *style:* **Use two spaces to indent, never tabs.**
```r
	    opt_traits_matrix <- matrix(opt_traits_matrix, ncol = n_traits)
^
```
[R/generateArtificialData.R:48:25:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L48) *style:* **Put spaces around all infix operators.**
```r
		      l <- (j - 1) * pool_richness + k
                       ~^~~
```
[R/generateArtificialData.R:48:28:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L48) *style:* **Place a space before left parenthesis, except in a function call.**
```r
		      l <- (j - 1) * pool_richness + k
                           ^
```
[R/generateArtificialData.R:48:31:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L48) *style:* **Put spaces around all infix operators.**
```r
		      l <- (j - 1) * pool_richness + k
                             ~^~
```
[R/generateArtificialData.R:48:36:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L48) *style:* **Put spaces around all infix operators.**
```r
		      l <- (j - 1) * pool_richness + k
                                  ~^
```
[R/generateArtificialData.R:49:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L49) *style:* **Use two spaces to indent, never tabs.**
```r
	    traits_distances <- abs(traits_pool - opt_traits_matrix)
^
```
[R/generateArtificialData.R:49:44:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L49) *style:* **Put spaces around all infix operators.**
```r
		      opt_traits_matrix[l] <- opt_traits[j]
                                          ~^~~
```
[R/generateArtificialData.R:50:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L50) *style:* **Use two spaces to indent, never tabs.**
```r
	    trait_distances_onedimen <- c()
^
```
[R/generateArtificialData.R:51:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L51) *style:* **Use two spaces to indent, never tabs.**
```r
	    for(m in 1:pool_richness){
^
```
[R/generateArtificialData.R:52:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L52) *style:* **Use two spaces to indent, never tabs.**
```r
	      trait_distances_onedimen[m] <- sqrt(sum(traits_distances[m, ] *
^
```
[R/generateArtificialData.R:52:31:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L52) *style:* **Put spaces around all infix operators.**
```r
	    opt_traits_matrix <- matrix(opt_traits_matrix, ncol = n_traits)
                             ~^~~
```
[R/generateArtificialData.R:52:65:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L52) *style:* **Put spaces around all infix operators.**
```r
	    opt_traits_matrix <- matrix(opt_traits_matrix, ncol = n_traits)
                                                               ~^~
```
[R/generateArtificialData.R:53:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L53) *style:* **Use two spaces to indent, never tabs.**
```r
	                                              traits_distances[m, ]))
^
```
[R/generateArtificialData.R:53:30:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L53) *style:* **Put spaces around all infix operators.**
```r
	    traits_distances <- abs(traits_pool - opt_traits_matrix)
                            ~^~~
```
[R/generateArtificialData.R:53:49:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L53) *style:* **Put spaces around all infix operators.**
```r
	    traits_distances <- abs(traits_pool - opt_traits_matrix)
                                               ~^~
```
[R/generateArtificialData.R:54:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L54) *style:* **Use two spaces to indent, never tabs.**
```r
	    }
^
```
[R/generateArtificialData.R:55:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L55) *style:* **Use two spaces to indent, never tabs.**
```r
	    inv_distances <- -(trait_distances_onedimen -
^
```
[R/generateArtificialData.R:55:16:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L55) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	    for(m in 1:pool_richness){
               ^
```
[R/generateArtificialData.R:56:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L56) *style:* **Use two spaces to indent, never tabs.**
```r
	                       max(trait_distances_onedimen)) + 10 ^ -99
^
```
[R/generateArtificialData.R:56:43:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L56) *style:* **Put spaces around all infix operators.**
```r
	      trait_distances_onedimen[m] <- sqrt(sum(traits_distances[m, ] *
                                         ~^~~
```
[R/generateArtificialData.R:56:71:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L56) *style:* **Trailing whitespace is superfluous.**
```r
	      trait_distances_onedimen[m] <- sqrt(sum(traits_distances[m, ] *
                                                                      ^
```
[R/generateArtificialData.R:57:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L57) *style:* **Use two spaces to indent, never tabs.**
```r
	    present_species <- sample(c(1:pool_richness), richness_values[i],
^
```
[R/generateArtificialData.R:59:27:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L59) *style:* **Put spaces around all infix operators.**
```r
	    inv_distances <- -(trait_distances_onedimen -
                         ~^~~
```
[R/generateArtificialData.R:59:31:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L59) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	    inv_distances <- -(trait_distances_onedimen -
                              ^
```
[R/generateArtificialData.R:59:51:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L59) *style:* **Trailing whitespace is superfluous.**
```r
	    inv_distances <- -(trait_distances_onedimen -
                                                  ^
```
[R/generateArtificialData.R:60:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L60) *style:* **Use two spaces to indent, never tabs.**
```r
	  comm_spec_matrix[i, c(present_species)] <- 1
^
```
[R/generateArtificialData.R:60:63:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L60) *style:* **Put spaces around all infix operators.**
```r
	                       max(trait_distances_onedimen)) + 10 ^ -99
                                                              ^~
```
[R/generateArtificialData.R:61:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L61) *style:* **Use two spaces to indent, never tabs.**
```r
	}
^
```
[R/generateArtificialData.R:61:29:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L61) *style:* **Put spaces around all infix operators.**
```r
	    present_species <- sample(c(1:pool_richness), richness_values[i],
                           ~^~~
```
[R/generateArtificialData.R:62:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L62) *style:* **Use two spaces to indent, never tabs.**
```r
	comm_spec_matrix
^
```
[R/generateArtificialData.R:63:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L63) *style:* **Use two spaces to indent, never tabs.**
```r
	if(length(which(colSums(comm_spec_matrix) == 0)) != 0) {
^
```
[R/generateArtificialData.R:64:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L64) *style:* **Use two spaces to indent, never tabs.**
```r
	  traits_pool_df <-
^
```
[R/generateArtificialData.R:66:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L66) *style:* **Use two spaces to indent, never tabs.**
```r
	}
^
```
[R/generateArtificialData.R:67:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L67) *style:* **Use two spaces to indent, never tabs.**
```r
	row1 <- c(column1[-c(which(colSums(comm_spec_matrix) == 0))])
^
```
[R/generateArtificialData.R:67:11:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L67) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	if(length(which(colSums(comm_spec_matrix) == 0)) != 0) {
          ^
```
[R/generateArtificialData.R:67:58:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L67) *style:* **Put spaces around all infix operators.**
```r
	if(length(which(colSums(comm_spec_matrix) == 0)) != 0) {
                                                        ~^~~
```
[R/generateArtificialData.R:68:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L68) *style:* **Use two spaces to indent, never tabs.**
```r
	if(length(which(colSums(comm_spec_matrix) == 0)) != 0) {
^
```
[R/generateArtificialData.R:69:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L69) *style:* **Use two spaces to indent, never tabs.**
```r
	  comm_spec_matrix <-
^
```
[R/generateArtificialData.R:71:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L71) *style:* **Use two spaces to indent, never tabs.**
```r
	}
^
```
[R/generateArtificialData.R:71:14:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L71) *style:* **Put spaces around all infix operators.**
```r
	row1 <- c(column1[-c(which(colSums(comm_spec_matrix) == 0))])
            ~^~~
```
[R/generateArtificialData.R:71:62:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L71) *style:* **Put spaces around all infix operators.**
```r
	row1 <- c(column1[-c(which(colSums(comm_spec_matrix) == 0))])
                                                            ~^~~
```
[R/generateArtificialData.R:72:11:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L72) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	if(length(which(colSums(comm_spec_matrix) == 0)) != 0) {
          ^
```
[R/generateArtificialData.R:72:58:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L72) *style:* **Put spaces around all infix operators.**
```r
	if(length(which(colSums(comm_spec_matrix) == 0)) != 0) {
                                                        ~^
```
[R/generateArtificialData.R:72:58:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L72) *style:* **Trailing whitespace is superfluous.**
```r
	if(length(which(colSums(comm_spec_matrix) == 0)) != 0) {
                                                         ^
```
[R/generateArtificialData.R:73:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L73) *style:* **Use two spaces to indent, never tabs.**
```r
	comm_spec_matrix <- as.data.frame(
^
```
[R/generateArtificialData.R:74:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L74) *style:* **Use two spaces to indent, never tabs.**
```r
	                      cbind(comm_spec_matrix, rep("", n_communities)))
^
```
[R/generateArtificialData.R:75:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L75) *style:* **Use two spaces to indent, never tabs.**
```r
	names(comm_spec_matrix) <- row1
^
```
[R/generateArtificialData.R:77:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L77) *style:* **Use two spaces to indent, never tabs.**
```r
	plots <- as.data.frame(matrix(
^
```
[R/generateArtificialData.R:77:26:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L77) *style:* **Put spaces around all infix operators.**
```r
	comm_spec_matrix <- as.data.frame(
                        ~^~~
```
[R/generateArtificialData.R:78:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L78) *style:* **Use two spaces to indent, never tabs.**
```r
	            as.numeric(as.matrix(comm_spec_matrix[,-ncol(comm_spec_matrix)])),
^
```
[R/generateArtificialData.R:79:33:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L79) *style:* **Put spaces around all infix operators.**
```r
	names(comm_spec_matrix) <- row1
                               ~^~~
```
[R/generateArtificialData.R:81:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L81) *style:* **Use two spaces to indent, never tabs.**
```r
	names(plots) <- traits_pool_df[, 1]
^
```
[R/generateArtificialData.R:81:15:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L81) *style:* **Put spaces around all infix operators.**
```r
	plots <- as.data.frame(matrix(
             ~^~~
```
[R/generateArtificialData.R:83:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L83) *style:* **Use two spaces to indent, never tabs.**
```r
	traits_pool_df[ ,c(2:ncol(traits_pool_df))] <- as.matrix(
^
```
[R/generateArtificialData.R:84:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L84) *style:* **Use two spaces to indent, never tabs.**
```r
	                traits_pool_df[ ,c(2:ncol(traits_pool_df))])
^
```
[R/generateArtificialData.R:85:22:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L85) *style:* **Put spaces around all infix operators.**
```r
	names(plots) <- traits_pool_df[, 1]
                    ~^~~
```
[R/generateArtificialData.R:86:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L86) *style:* **Use two spaces to indent, never tabs.**
```r
	for (i in 2:ncol(traits_pool_df)) {
^
```
[R/generateArtificialData.R:87:53:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L87) *style:* **Put spaces around all infix operators.**
```r
	traits_pool_df[ ,c(2:ncol(traits_pool_df))] <- as.matrix(
                                                   ~^~~
```
[R/generateArtificialData.R:88:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L88) *style:* **Use two spaces to indent, never tabs.**
```r
	}
^
```
[R/generateArtificialData.R:89:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L89) *style:* **Use two spaces to indent, never tabs.**
```r
	output <- list( traits = traits_pool_df, abundances = plots)
^
```
[R/generateArtificialData.R:90:13:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L90) *style:* **Place a space before left parenthesis, except in a function call.**
```r
	for (i in 2:ncol(traits_pool_df)) {
            ^
```
[R/generateArtificialData.R:91:1:](https://github.com/thijsjanzen/STEPCAM/blob/eeb09f62aadd8d835a16cf18c8775d4bed3fa5d5/R/generateArtificialData.R#L91) *style:* **Use two spaces to indent, never tabs.**
```r
	return(output)
^
```


@mtaheij Didn't notice this earlier. Any stuff related to Spawnpoint is not relevant. Spawnpoints are some unknown objects I discovered earlier and coded them to be visible in another local branch. Somehow parts of that code got to my GIT incense branch as I  still have a lot to learn about syncing. Sorry :(


Also see [Issue 264: Clang 3.3, i686 and "error: unknown use of instruction mnemonic without a size suffix"](http://github.com/weidai11/cryptopp/issues/264).


EMS (brianlball) - x86_64-Linux-Ubuntu-14.04-clang-3.5: OK (2294 of 2480 tests passed, 0 test warnings)

![Build Badge](http://img.shields.io/badge/build%20status-warnings-yellow.svg) ![Test Badge](http://img.shields.io/badge/tests%20passed-92.5%25-yellow.svg)


[R/convert_merge_table_to_phyloseq_otu_table.R:17:1:](https://github.com/seninp-bioinfo/MetaComp/blob/097b747e3a2d60fd6f4fbc59b42b7144a33cbee0/R/convert_merge_table_to_phyloseq_otu_table.R#L17) *style:* **Variable and function names should not be longer than 30 characters.**
```r
convert_merge_table_to_phyloseq_otu_table <- function(filepath, TAXON){
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_convert_merge_table_to_phyloseq_otu_table.R:4:8:](https://github.com/seninp-bioinfo/MetaComp/blob/097b747e3a2d60fd6f4fbc59b42b7144a33cbee0/tests/testthat/test_convert_merge_table_to_phyloseq_otu_table.R#L4) *style:* **Variable and function names should not be longer than 30 characters.**
```r
dat <- convert_merge_table_to_phyloseq_otu_table("../test_data/merged_table.tsv", "class")
       ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[tests/testthat/test_convert_merge_table_to_phyloseq_otu_table.R:21:22:](https://github.com/seninp-bioinfo/MetaComp/blob/097b747e3a2d60fd6f4fbc59b42b7144a33cbee0/tests/testthat/test_convert_merge_table_to_phyloseq_otu_table.R#L21) *style:* **Commas should always have a space after.**
```r
expect_that(sum(dat[,1]), equals(1.0))
                     ^
```
[tests/testthat/test_convert_merge_table_to_phyloseq_otu_table.R:26:13:](https://github.com/seninp-bioinfo/MetaComp/blob/097b747e3a2d60fd6f4fbc59b42b7144a33cbee0/tests/testthat/test_convert_merge_table_to_phyloseq_otu_table.R#L26) *style:* **Variable and function names should not be longer than 30 characters.**
```r
expect_that(convert_merge_table_to_phyloseq_otu_table("../test_data/merged_table.tsv",
            ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```


No, they both come as a group, so checking for one is sufficient for both.


Sounds good. I'll keep everything in an open source fork for now. We can revisit if other key value store users want this functionality.


@gitter-badger you need to sign Plone Contributor Agreement in order to merge this pull request.

Learn about the Plone Contributor Agreement: http://docs.plone.org/develop/coredev/docs/contributors_agreement_explained.html


Why remove parameter names? Not consistent with setPort()


Я сделал чтоб компоненты <PostListItem> отображались в 3 колонки. Для этого мне нужно чтоб <div> с классом _listView_ отображался как flex.


no more spammmmmmm


no more dupe


Hello Mustafa

I submitted another pull request to add a default mode to choose the first vertex. Since you changed the structure, can you add this mode in your current version? Thanks


$http нужно убрать в сервисы


Плохая практика делать jquery в контроллере, нужно завернуть плагин в директиву и добавить ее в темплейте.


@khurshid-alam That would explain why I couldnt reproduce the Xfxe issue!

![homer-simpson-doh](https://cloud.githubusercontent.com/assets/4675662/18722987/73a954de-7ffc-11e6-930f-effb24aa0863.gif)


@lots0logs Already fixed it. :)


1. Довольно странное решение проверки состояния формы.
2. У тебя уже заинжекчено $window, нужно его и использовать.


I assume the RegularImmutableList(Object[], int, int) constructor wasn't actually being used anywhere before this commit? If so, this seems like a rather sensible thing to do.


@marrbnl
Sure, I will do that. Thank you for adding the default mode.


Что такое `showMsg`? Нужно называть переменную, чтобы из названия было понятно, за что она отвечает.